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BASIC 言 語 と は 、 こ れ ま て 機械 語 (0 と 1 の 
連続 で 表現 ) で 簡単 な 計算 で も 大 変 な 長 る の プ 
ログ ラム に な っ だ も の を 、 人 間 の 言葉 に 近い 言 
語 で 会 話し な がら 6 プログ ラム を 作る こと が で き 
る 、 と いう 素晴らし い コ ンピュータ 言語 な の で 
す 。 

HuBASIC は 、 さ ら に その BASIC 言 語 を 基 
礎 に し て 、 ょ より 使い 易く 開発 きれ た BASIC て で 、 
この HuBASIC を 学習 する た だ た め に は 、 むず か し 
い 知 識 は 全く 必要 と せ ず 、 ち ょ うど 皆さん が 英 
単語 の 基礎 を 勉強 する の と 何ら 変わ る と ころ は 
あり ませ ん 。 

その 上 、 単 語 の スペ ル や 文法 の 間違い は コン 
ピュ ー タ が ちゃ ん と 指摘 し て くれ ます か ら 、 理 
解 ・ 上 達 が 早く 、 本 当 に 楽し い 学 習 に な る こと 
を し まあ 

る て 、 ノ パソ コン に 興味 を 持っ た 諸君 それで 
は ゆり ちゃ ん と 一 緒 に 、 早速 素 晴 し い X1 Hu- 
BASIC の 世界 へ ご 案内 し まし ょ 5, 

Dr. Bee. 


今 ,。 マ イコ ン が ブー ム を 呼ん で いる よう で す が , HS 
ん 興味 は お あり で すか ? 

私 は , 現在 大 学 で 法律 の 勉強 を し て いる の で す が , コ 
ンピュータ っ て 意外 な と と ころ で か か わっ て くる も の な ん 
で すね 。 講 議 の 中 で , 過去 の 判例 を コン ピュ ー タ に 記憶 
SHC, 分 野 別 に , ある い は 裁判 長 , 検察 官 別 に 必要 に 
応じ て ひき 出せ る と いう 話 を 聞い た ん で す よ ね 。 

わぁ , 便利 っ て 感動 し た ん だ けれ ど , アメ リカ で は も 
う 実 用 化 さ れ て いる ん で すっ て 。 裁判 だ っ て し ょ せん 人 
間 が する と と な ん だ か ら , 裁判 官 の 考え 方 に も 傾向 は あ 
る だ ろう し , 規模 に よっ て も 差 が あり ます よね 。 

と ん な 条件 で と の 程度 な ら 勝て そう だ と か , 被告 の 立 
場 は 弱い けど 過去 に こん な 弁護 を し た ら 有 勝訴 の 判決 が 出 
た と か , そう いう と と が さっ と わか れ ば 裁判 だ っ て 変わ 

Si っ て くる と 思い ませ ん ? 
プロ ロー ツ これ か ら 司 法 を 志す 人 が いる の な ら , コン ピュ ー タ は 
絶対 必要 で す よ 。 そ う 思 っ て 勉強 を 始め た ん だ けど な か 
な か 思う よう に は いか な く て …… 数 学 が 嫌い で 文系 に 進 

ん だ くら い だ か ら な ぁ 。 

と に か く 始 め て みよ うと 思っ て , コン ピュ ー タ の 本 を 
買い 集め まし た 。 と の 時 , 初め て 知っ た の が , コン ピュ 
ー タ 言語 が ある と いう 事 。 え , 言語 ? と 思う で し ょ 
De 

どう いう と と な の か っ て 言い ます と , つま り , 世界 中 
(に は 英語 を 話す 人 も いれ ば , 日 本 語 , 独語 , 仏語 を 話す 
人 も いる し 様々 で す よ ね 。 ど の 言葉 で も お 互い に 同じ 言 
葉 を 使え ば , 意志 は 通じ る けれ ど , 一 人 が 英語 , 一 人 が 
日 本 語 で は だ めで すね 。 コ ンピュータ も と れ と 同じ だ と 
いう 事 な ん で す よ 。 

言語 の 種類 に は BASIC, コ ボ ル , フォ ー ト ラン な ど が 
あり ます 。 そ れ ぞ れ の 言語 に それ ぞ れ の 文法 が ある と 考 


えて も ら う と 理解 し や すい ん じゃ な いか し ら 。 文法 を 間 
違え た ら 意 味 は わか ら な いし , まし て や , 他 の と と ば の 
文法 と 混ざっ て し まっ た ら 大 変 な と と に な り ま す よ ね 。 

そん な わけ で , まず 言語 を 決め て , 正しい 手順 で 勉強 
する と と が 必要 と な っ て きま す 。 

今度 私 が トラ イ し て みる の は BASIC, B-Beginner's 
A-All-purpose S=Symbolic I=Instruction C=Code 
と いう わけ で , つま り , “初心 者 向き で あら ゆる 目的 に 
合う 記号 を 使っ た 命令 語 ” な の だ そう で す 。 早い 話 が 初 
心 者 向き と いう と と で , 一 番 入 りや すい の で は な いか と 
思っ た の で す が …… そう 簡単 に は いか な いみ た い だ な ぁ 。 

さら に , BASIC と いっ て も いろ いろ ある よう な の で 
す が , 私 が 勉強 する の は HuBASIC で す 。 機械 が シャ ー 
プ が 新 発 売 し た パソ コン テレ ビ X-1 な の で , と れ を 選 
びました 。 

Hu-BASIC の Hu は HUDSON SOFT の HU で Hu- 
manity の Hu で も ある そう で す 。 ち ょ っ と 素敵 で し ょ 。 
別に コン ピュ ー タ は , 非 人 間 的 な も の で も 冷た いも の で 
も な いん で す よ 。 

“新しく 何 か を 始め る に は , まず 実際 に 「 や っ て みる 」 
と と で す 。 で も 「 や っ て みる 」 と いっ て も , 初め て の 人 
(に と っ て は な か な か 勇気 の いる と と だ し , 第 一 や っ ぱり 
し ん どい も の で す "。 

“水泳 の 本 を 読み , 畳 の 上 で 練習 し た か ら と いっ て , 
すぐ に 海 に 飛び と こん だ ら 滋 れ て し まい ます 。 そ れ は 知識 
を た くわ えて も , 「 勘 」 が つい て いな いか ら で す 。「 勘 」 
を つけ る に は , や っ ぱり 基礎 か ら 勉 強し て スマ ー ト に 
「 や っ て みる 」 CECH” 

“コン ピュ ー タ は 少し ぐら い 使 い 方 を まち が っ て も , あ 
な た を 危険 な 目 に あわ せる よう な ひど い 道 具 で は あり ま 
WA. 使い 慣れ た ら 手 離せ な いく らい 便利 な 道具 で す "。 


| ここ トト トト トト ニニ C NE IS 1S ee A SLES OES LIE SR 


と の 文 は 同じ シャ ー プ の MZ-1200 の マニ ュ ア ル か ら 
引用 し た も の で す が , 最初 どう し よう か と 迷っ て いた 私 
に ヤル 気 を 起 と させ て くれ た と っ て も 印象 深い 言葉 で す 。 

そう いう ワケ で , 結局 まず は 手 で 機械 に 触れ , くり 返 
し や っ て みな くち ゃ な ら な いと いう の で , 考え 抜い た 揚 
J, と に か く HuBASIC を 開発 し た HUDSON SOFT の 
東京 営業 所 を 訪ね て みる と と に し た ん で す 。 

その 時 指導 し て 頂い た の が , 実は と の 本 の 共著 で ある 
Bee 先生 な ん で すね 。Bee 先生 の 優し く 根気 強い 指導 の 
お か げ で , 今や 私 も 独力 で プロ グラ ミン グ が 組め る 程 に 
成長 し まし た 。 ホ ント で す よ /〆 

T, と の 私 の 成長 過程 を 綴っ た の が 「 パ ソコ ン テ レ ビ 
X 1 HuBASIC 私 の 勉強 ノー ト 」 っ て ワケ な ん で す が , 
と れ は 私 が Be 先生 の お っ し ゃ る と と を 大 学 ノ ー ト に 
綴っ て た の を Bee 先生 が 見 つけ , これ は 面白 いと いっ 
て 一 冊 の 本 に し よう と 言い 出し た の が キッ カケ 。 

基礎 に な っ て る の が 私 の 大 学 ノ ー ト に ビッ シリ 書き 込 
まれ た メモ で すか ら , 何と な く 心 も と な い の で す が , 足 
りな い 分 は , 欄外 に Bee 先生 の コメ ント を 入れ フォ ロ 
ー す る と いう の で OK し まし た 。 また 欄外 の 空白 は 読者 
の 皆さん が メモ を 書き 込む 様 に も 配慮 され た スペ ー ス だ 
そう で す 。 

TILT, あれ と れ 戸 惑 い な が ら ( 何 日 か 徹夜 も し た 
ん で す よ ) 完 成 し た の が と の 「 パ ソコ ン テ レ ビ X1 HuBA- 
SIC 私 の 勉強 ノー ト 」 です 。 

少し で も 読者 の 皆さん が , パソ コン テレ ビ X 1 を 使う 
上 で の , また BASIC を 理解 する 上 で の 手助け に な れ ば 
幸い で す 。 

前 置き が 大 変 長 く な っ て し まい まし た ね 。 そ ろ そ ろ ノ 
ー ト 1 TES, X1 の 構造 を 知り まし ょ う 」 か ら 入 っ て 
行き まし ょ うか 〆 
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--cae., ニニ ニニ ーー- 
AS AS 
- こ ここ や ゃ ゃ で 


コン ピュ ユ ュー タ の ディ スプ レイ 画面 
を TT\ 画 面 と し て も 使え る の 。 し いろ 
いろ 秘訣 も … 


SC, 私 の 使う コン ピュ ー タ は …… A, Cnt 
ー タ な の ? 見 た 感じ は まる で テレ ビ よ ね えと れ じ ゃ 。 

と の X 1 は , TV も 視 ら れる コン ピュ ー タ な ん で すっ て 。 TV 
コン ピュ ー タ と で も 言う べき か ナ 。 要する に ディ スプ レイ を コ 
ンピュータ の CRT 画 面 と し て も , TV の ブラ ウン 管 と し て も 
使え る の 。 だ か ら ペ パソ コン と テレ ビ が 一 体 化 し た も の な の ね 。 


キャ ラク タ は ロロ T こ と いう 画素 単 
位 で 構成 され て いい て 、 己 文字 
SHES 


CRT ディ スプ レイ の 説明 を し て お きま し ょ う 。 画面 は どう 
や っ て 構成 され て いる の か し ら ? 


ーー 80 文字 一 ーーーーーー| 


"1 


と の よう に , 画面 の 横 一 杯 に 文字 を 打つ と 80 文 字 , 縦 は 25 文 
字 入 れる と と が で きま す 。 と れ を 80 モ ー ド ( 横 に 80 文 字 入 る モ 
ー ド ) と 呼び ます 。 

80 モ ー ド に 対し て , 40 モ ー ド と いう の も , ある そう な ん で す 
が , と れ は 1 文字 が 80 モ ー ド の 文字 の 倍 の 大 き さ だ と 考え れ ば 
良い わけ で す 。 同じ ディ スプ レイ に , 80 モ ー ド の 半分 の 文字 し 
か , 入れ られ ませ ん 。 

e AAF m 


& c, 画面 を 更に 細か い 単 位 で 見 て みる と DOT と いう 単位 
が 出 て きま す 。 1 DOT は 画面 を 構成 し て いる 最小 単位 で す 。 


00000000 


| = ニュ 文字 
| 


0000000 


と ん な ふう た , 1 文字 は , Kt, 横 8 個 ずつ 計 64 個 の DOT で 
区 切ら れ て いま す 。 だから , ディ スプ レイ 全体 を , DOT 数 で 
表わす と ,。 と うな る で し ょ 。 

E——— — — ———640 D 0 T — ——4 


200 


JoJ 


10 


CSSEIIZ<QDOTRERRT 
きる こと が ルリ ソコン デイ スズ レイ 
の 必要 条件 ご す 


そこ で, 図 の よう に 最低 640x200 DOT と いう DOT ROR 
示 を 可能 に する た め に は , どの よう な 問題 を 解決 し な けれ ば な 
ら な いか 上 と いう と と で ます 。 

と とこ で, と くだ 問題 に な る の が , 水平 方 向 の DOT 数 , つま 
り 640 DOT と いう と と 。 

"ud, CO 640 DOT が 間 題 に され な けれ ば な ら な いか と い 
うと, 一 般 家 庭 で 使わ れ て いる テレ ビ 受 像 機 で は ,。 と ん な に た 
くさ ん の DOT 数 を 表示 で き な い か ら だ と いう ん で す ネ 。 

と て と か ら 先 の 話 は , 法学 部 の 私 に と っ て は チョ ッ ト 荷 が 重い 
の だ けど , いろ いろ と 受け 売り の 話 も 混ぜ て , と の 問題 を さら 
に 者 詰め て いき まし ょ う 。 

家庭 用 の テレ ビ で は , 放送 され て くる テレ ビ の 映像 周波 数 帯 
域 の 上 限 が 4 2 MHz 止ま り だ っ て と と , 知っ て る ? 

と の と と か ら , デ ィ ス プレ イ 画 面 , い や ブラ ウン 管 上 に 表示 で 
きる 画像 の 解像度 は , せい ぜ い 250 本 か ら 300 本 どまり に な る 
ん だ そう で す 。 と の 300 本 の 解像度 と いう の は , 画面 上 に 細い 
終 の 直線 を 何 本 も 表示 させ て みて , いっ た い 何 本 の 直線 まで を 
見 分 けら れる か , と いう と と ろ で , その 画像 表示 能力 の 細か さ 
が 決定 され る と いう わけ 。 だ か ら , その 数 は 多い 方 が いい と い 
うわ け ネ , 当然 の と と だ けど 。 

し か も で す ョ ヨ , て とれ は , 特別 に 性 能 の 良い 受像 機 を 使っ た ら 
の 話し な ん だ か ら 。 平均 的 な テレ ビ の 性 能 と いう の は , “推し て 
知る べき べし” FEDER, 

Cnt, 家庭 用 テレ ビ で は , 水平 方 向 640 DOT を 表示 する 
の は と て も 無理 だ と いう と と が よく 理解 し て も ら え た と 思う け 
Es 

それ で は 垂直 方 向 の 200 DOT は どう か と いい ます と , 日 本 


の テレ ビ 方 式 で は , 画像 の も と に な っ て いる 水平 走査 線 が 525 
A, 視 え る 部 分 で も 500 本 近い 数 を 確保 し て いる か ら , 200DOT 
を 表示 する の は ワケ な い の よ ネ 。 だ か ら , 問題 に な る の は , あ 
くま で 水平 方 向 の 640 DOT と いう わけ な の 。 

そ と で な ん だ けど , と の 640 DOT を 表示 し きれ る の は , 専 
用 の ペア コン 用 か カラー CRT ディ スプ レイ し か な いと いう こと と 
に な る わけ ネ 。 

た し か に , と の X 1 の 内 容 と 実力 か らい えば , そ と いら の テ 
レビ で 表示 し きれ る も の で は な いと は 思う の で す ョ ヨ ョ 。 Ch, Z 
れ で は パソ コン テレ ビ に な ら な いわ け で す 。 

と と で , も う 一 度 確認 し ます けど , と の X] と いう の は 。 ^ 
ソコ ン 部 CZ800C と ディ スプ レイ テレ ビ CZ-800D が 組み 
合わ きれ た も の で す 。 

だ か ら , と の テレ ピ 部 分 CZ-800 D は ディ スプ レイ テレ ビ と 
呼ん で いる けど , 画像 表示 能力 の レベ ル で は , 専用 ディ スプ レ 
イィ 並み で ある 必要 が ある っ て と と な の ネ 。 
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SES AEREAS 
を 付け た ディ スプ レイ で 万 能 の 映 
像 機器 に 


SH, いよ いよ と の ディ スプ レイ テレ ビ の 本 題 に 入る ん だ け 
E, 構造 と 機能 か ら み て いく と , テレ ビ 受 像 機 と パソ コン ディ 
スプ レイ を 兼用 させ る た め に , いろ いろ な 工夫 が 盛り 込ま れ て 
いる と と が わか り ま す 。 

その 第 一 は , RGB カラ ー 三 原色 分 離 独立 入力 端子 が 付い て 
nat Es 

も う 一 つ 余 談 に な り ま すけ ど , 入力 端子 と し て は , 複合 映像 
信号 入力 , 通常 は ビデ オォ 入力 と 呼ば れる 端子 も 付い て いる の で 
E 

と と で , 回 り 道 を し て お さら いと いき まし ょ う 。 テ レビ 受像 
機 の 構造 を みる と , アン テ ナ か ら 入 っ た 電波 の 通る 回 路 を 順番 
に 並べ る と , 高周波 (RF) 回路 一 映像 中 间 周 波 增幅 (IF) 回 
路 一 映像 増幅 一 カラ テー 復調 (分離) CRT と いう 道筋 に な る の 
a ee Bar ig a 


映像 別に 入力 端子 を 別々 に する こと 
いう の が X] の 大 本 コン セプト . 


T, ビデ オォ 入力 と いう の は , 映像 中 間 周 波 と 映像 増幅 の 間 に , 
また RGB 入力 と いう の は CRT 直前 に 入力 する よう に な っ て 
いる そう な の 。 


そ と で , 話し を 単純 化す る と , CRT に 近い と と ろか ら 入 力 
する 映像 ほど , 純度 が 高く て , 質 の 良い 画像 が 得 ら れる と 言え 
る の じゃ な いか し ら 。 

Kb, ROBAJDE, マソ ツ ソ コジ ディ ヌス デザ タイ と る で 。 $ 
う 絶 対 に 必要 だ と いう と と な の よね 。 

それ か ら , テレ ビ 放 送電 濾 な ん だ けど , と れ は アン テ ナ か ら 
入っ て 来る の よ *。 当然 だ けど , X 1 に と っ て は 第 三 の 映像 と 
いう わけ 。 ビデ オ 入 力 は ホー ム ビ デ オ や ビデ オデ ィ ス ク な ん か 
の 専用 入力 口 。 パ ソコ ン 用 入力 は RGB だ か ら , それ ぞ れ 情報 
別に , 別々 の 入口 か ら 情 報 を 取り 入れ る と いう の が X 1 の 基本 
コンセプト な の よね 。 

と うい う 思 想 は , 最近 の モニ ター テレ ビ な ん か に も み ら れ る 
傾向 な の (な あん て エラ そう に いっ た り し て )。 X 1 の よう な , 
ある い は CZ800 D の よう な , 三 系 統 の 入力 端子 を 持っ た ディ 
スプ レイ テレ ビ と いう の は , 一 種 の 流行 に な りつ つ あ る と いえ 
る の だ けど 。 


R に 握 入 力 は ビ RT に スト レー ト に に 
(BREANSC CARE 合理 的 な 
の で す / 


ま , それ は と も か く , RGB 入力 の 強み は CRT に 近い と と 
ろか ら 入 力 で きる と いう と と も 大 きい けど , その た め , 従来 の 
テレ ビ 用 回 路 の 限界 に 制約 され る と と な く , 最高 15 MHz の 高 
周 濾 帯 域 で 映像 情報 を 送り 込め る と いう の が 大 き な メ リッ ト な 
の よ ネ 。 テ レビ の よう に 4.2MHz が せい ぜ い な ん て いう の と 
は も う 天 と 地 ほ どの 違い 。 

だ か ら と そ , 80X25 字 の 2000 字 も の 文字 表示 も で きる の , 
SAT, も る タ と と で し つと 《 く 繰り 返す まで も な いわ も よ ネ 。 
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シャ に ウマ スン の 目 を 細か くし た 
ファ イン ピッ チ 菅 を 採用 、TV 用 に 
も 配慮 / 


し づこ とい うつ いで だ た シャ ドウ マス ネス ク の 話し も び ひとつ 。 Ye F 
ウマ スク の と と は , と と で は くわ し く は 説明 する 必要 は な いと 
思う ゆけ ど 。 カラ ー テ レビ 左 は な く て は な ら な いも の と いう と と 
FEW, 確認 し て お きま し ょ う 。 

と の シャ ドウ マス ク は , 網目 状 に な っ て いる ん だ けど , TO 
綱目 が ある 程度 細か く な いと , 解像度 の 高い 画像 を 得 ら れ な い 
の で す 。 

従来 の チ テレビ で は , 0.63zm ピ ビッ チ と いう 目 の 細 か さ が 基 準 
だ っ た らし い の 。 とれ は , テレ ビ で は , それ ほど 細か な 画像 を 
必要 と し な か っ た と と と , 逆 に あま り ピ ッ チ を 細か くす る と , 
ブラ ウン 管 の 明る さ が 十 分 に 得 ら れ な く な る と いう 欠点 が 出 て 
くる た めで も あっ た ん だ っ て 。 

と と ろ が , 専用 カラ ー デ ィ ス プレ イ で は , 明る さよ り も , 
解像度 優先 な ん だ か ら , シャ ドウ マス ク は , ギリ ギリ まで 細か 
くつ め た 高 精 細 度 管 を 使っ て いる わけ 。 

そ と で , CZ-800D で は , 標準 の シャ ドウ マス ク ピ ッ チ を 更 
に 細か くし た ファ イン ピッ チ 管 を 採用 し て , 解像度 の レベ ル を , 
で きる だ け 専 用 ディ スプ レイ 近づけ , し か る, CRT 表面 の 
フィ ル タ 塗 料 も 新しい と 言う こと と で すか ら , 見 か け 上 の 明か る 
さ コ ント ラス ト は 従来 の ブラ ウゥ ン 管 以上 。 だ か ら , と の X 1 で 
テレ ビ を 観 て も 従来 の チレ ビ に 勝る と も 劣ら な いと いう か , と 
に か くき れい な “ 絵 " が 楽し め る と と うけ あい …… な ん だ っ て 。 


POWER 
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XX] は 日 ピッ ト の 頂 京 に 立つ 、 究極 
的 な 日 ビッ トマ シン な の ね // 


ホ ノ や っ と 一 段落 ネ 。 ひ と と お り の 説明 を 無事 に 終え て や れ 
や れ と いっ た と と ろ 。 それ に し て も , な れ な い 説 明 で 肩 が 凝っ 
て し まっ を だ アメ 

Tb, いっ し ょ うけ ん めい 説明 し た か いあ っ て (な ぁ ん て 上 自 
分 で 言っ た り し て ), と の X 1 が , いか に 新しい 情報 機器 と し て 
ふさ わし い 内 容 を 備え て いる か と いう と と が , よく 理解 し て い 
BREGEEH ID, 

あん まり テレ ビ 部 分 ば か り 力 を 入れ て 説明 し て し まっ た の で , 
肝心 の パソ コン 部 分 つまり CZ-800C に つい て の 説明 が 不足 
LES. 

た だ , テレ ビ 部 分 の よう な 出力 機器 自体 が 高 性 能 で し っ か り 
し て いな いと , X 1 の よう に , グラ フィ ッ ク 分 野 に 力 を 入れ て 
いる パソ コン の 能力 を 十分 に 発揮 で き な い , と いう と と を お さ 
えて お きた か っ た の 。 そ と の と と ろ を 皆さん 了解 し て 下さ い ネ 。 

a T, CZ2-800C の 話し に 戻り まし ょ う 。 CZ-800C [BE 
ッ ト の 頂点 に 立つ ] 究極 的 8 ビッ トマ シン と いう 開発 コン セ プ 
ト で 始め られ た だ け あ っ て , 今 ま で の 8 ビッ トマ シン の 集大成 
と いっ た 優れ た 内 容 と 使い 易 さ を 備え て いる の で す 。 

何 が 「8 ビット の 頂点 ] か と 言う と , と の X 1 は , 8 ビッ ト 
マシ ン が 一 度 に アク セス で きる メモ リ 容 量 604K バイ ト と いう 
限界 を つき 破っ て , 128K バイ ト ま で アク セス で きる 能力 を 持 
た せ た と いう と と な ん で す 。 し か も バン ク 切 換え な し で , fh 
か た ち た 使え る 8 ビッ トマ シン な の で す 。 

と れ は 。 むず か し く 言 うと , ソフ トウ エア を 工夫 する と と に 
よっ て , VO 空間 を メモ リ 空 間 に 開 放す る と と で , 従来 の 2 倍 
の ]12B 人 KK ペイ ト よ いう メモ リ 数 を アク セス で きる よう 所 し た と 
いう と と で , と れ に よっ て , ハイ スピ ー ド 化 , 機能 アッ プ な ど , 
「 と れ で 8 EY EM と いう くら い の 充 実 し た 内 容 を 誇る の だ 
eS EF, 


V VOLUME ^A COMPUTER/TV 


« 
: 
> 


シャ ー プ 自信 の フル RAM 構 成 、 ソ 
フト ウェ ア に 期待 が か か っ て ます 


さて , と の 128KK バ イト の メモ リ で す が , 4KK バ イト の IPL 
を 除い て 残り は 全て RAM つま り フ ル RAM 構成 に な っ て い 
AN 

フル RAM 構成 で は 大 胆 に 推し 進め て きた シャ ー プ も , X 
くも と と まで 思い 切っ て … と いう くら い の 企 画 だ と 思う の で す 。 
メモ リ の 殆 ん ど が RAM, これ を みた だ け で も 。, 今後 の ソフ 
トウ ゥ エア 開発 面 で の 自信 ,. それ に ユー ザー と し て も (も ちろ ん 
私 の よう に , も と も と 機械 に は 強く な い ヒ ト で も ), 一 度 使い 
始め る と , も う グ ッ と 引き 込ま れ て 自分 で どん どん コン ピュ ー 
タ の と り と に な っ て いっ て し まい そう な 和 柔軟 さと 深み が ある ん 
CTL A 

で すか ら , 世の中 で は 16 ビ ッ ト マ シン に 期待 が か けら れ て い 
る と いう 傾向 も みえ ます が , 私 は , 一 度 で も と の X 1 に 触れ る 
と 。 も う 16 ビ ピット だ 何だ の と 言う 前 惨 どう し て も 8 ビッ トド を 
完全 に 征服 し て みた いと いう 気持 ち に 駅 られ る の も 当然 の と と 
だ と 思う の で す 。 
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テレ ビ と パソ コン が 同時 に ディ ス 
プレ イ 上 に 映し 出せ は る スー バー イ 
ン ポ ボ ポーズ が 特徴 

と いう と と で , て の X 1 の 実力 に つい て , 私 な り に 目 に つく 
ポイ ント を 挙げ て み ま し た 。 と と で , も う ひ と つ 付 け 加 えた い 
の は , スー パー イン ポー ズ と いう 独特 な 機能 で す 。 

最初 の ととろ で , XILT, デレ ビ と パソ コン ディ スプ シイ 
の 機能 が 矛盾 な く 同 居 す する と と が で きる よう , さま ざま な 面 で 
工夫 が 凝ら され て いる と と を 説明 し まし た ネ 。 

LOL, それ ほ は デレ ルビ と ペッ コン ディ ャ スプ レイ が 。 SHEN 
別々 に 十分 な 機能 を 果たす と いう と と を 第 一 と し て いた の で す 。 
と の スー パー イン ポー ズ は , そ と か ら 一 歩 進ん で 。 FUEL 
パソ コン を 同時 に 一 つの ディ スプ レイ 画面 に 載せ る と いう 考え 
で す 。 両方 の 画面 を 合成 で きる よう に な る と , また いろ いろ な 
楽し み が 出 て くる と 思う の で す よ ネ 。 

技術 的 な 問題 点 は , それ ほど 障害 に は な ら な いと 思う の で す 
が , 例え ば , テレ ビ や ビデ オ 画 面 に は イン ター レー ス 方 式 と い 
う 画 像 の 構成 の し 方 . パソ コン で は , その イン ター レー ス が な 
O, と いう よう に た, 方 式 の 違い が ある そう な ん で す 。 て と れ に つ 
いて は , 細か な 説明 は し ませ ん が ( 誰 で すか . ノ できない ん だ ろ 
うな ん て いう 人 は ),。 と うい っ た 方 式 間 の 違い も , 最終 的 に は 
うま くま と め て し まっ た と いう と と で すか ら , と の X1, 商品 
企画 を コン セプト の まま で 終ら せる と と な く , 絶対 に 実用 的 な 
商品 に する ん だ ノノ と いう 製作 者 側 の 情熱 が さま ざま な 障害 を 乗 
Déoft6b oxXtLSseÉS,. 

私 も これ か ら 実 際 の X 1 の 使い 方 に つい て も っ と 深く 探求 し 
THLE LRN. 

その 過程 で , 一 層 X 1 の すばらし さ K 出 会 うこ と が で きる と 
思う の で す 。 


See a a ee T’ 


y o 
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CR ディ スプ レイ と 本 体 の 電源 を ON ! Sn, 何 か 出 て 
SZ LAE, 
Make ready any device 
Push (F, R, C or T) Key 
F : Floppy 
R : ROM 
C : CMT (CASSET MAGNETIC TAPE) 
T : Timer 
と ん な 表示 が 現われ ます 。 さて, X 1 を SHARP HuBASIC 
の 使え る 機械 に する に は , どう し た らい いん で し ょ うか 。 


33, BASCT-I20-N3IS 
ここ ろか ら 。 ロ 時 一 を 押し て テー プ 
スタ ー ト 

まず BASIC テー プ を 入れ , 上 の 表示 に 合わ せ て , どれ か の 
KEY を 押さ な けれ ば な り ま せん ね 。 カ セッ ト を 利用 する わけ だ 
か ら [C| キ ー を 押し ます 。 

COR, カナ KEY が ロッ ク さ れ て な いか どう か 確か め る の 
を 忘れ ず に ね 。OFFE の 状態 に な っ て な いと キー は 押せ ませ 
ん 。 統 を 押し て る と と に な っ ちゃ いま す よ 。 

IPL is looking for a program from CMT 

まず と ん な 表示 が 現れ , 次 に 

IPL is Loading BASIC CZ8CB01 

と いう 表示 に 変わ り ま す 。 と うな る と ロー ド 中 な わけ で , 1 


て 2 分 程 ロ ー ド が 終わ る の を 待ち ます 。X 1 だ と , すぐ テレ ビ 
と 切り 換え られ る の で , こと ん な 時 は テレ ビ で も 見 な が ら , の ん 
びり 待っ て くだ さい 。 


== T qQz>_ OAM ML Ws RR 2 


SHhrHRP-HuBRSIC Cz-8ScB81 V1.8 
Copyright (C) 1982 by SHARP - Hudson 


ロー ド に が 売 了 する こ 、 BASIC 
えま すう 。 キー 入力 の 後 、 CRAE 
忘れ ぎ ず に / 


と うな っ た ら モ ー ド を 切り 換え (テレ ビ を コン ピュ ー タ に 切 
り 換 え ) カセ ッ ト を 取り 出し て くだ さい 。 

は い , も う 準 備 完了 ! 

と れ で X 1 は BASIC が 使え る 機械 に な っ た わけ で す 。 さて, 
何 か 書 いて みな さい と いう 先生 の お 言葉 に より , 早速 自分 の 名 
前 を 打っ て 見 まし た 。 (1) 


Ok. 

shinagawa yuri M 

BASIC で は , 入力 が 終わ る と , 必ず [CR] ボタ ン を 押さ な 
けれ ば な ら な いと いう と と な の で , 

Ok 


shinagawa yuri [CR 
Aiea error 


1 
コマ ンド (命令 ) を 受け 付け る の は 、 


画面 の カー ソル が 点 減 し て いる 時 に の 


み 受 け 付 ける の で す 。 


る 1 


RR 


巳 A ヨ ピロ の 文法 に 台 わ な し 入力 を す 
32, Syntax errar Om 


何で し ょ う ね ぇ …。 と の Syntax error oT? エラ ー は 誤 
まり だ っ て いう の は , 想像 が つく ん だ けど ね 。 え っ ーー と ……… 
Syntax と は ? 辞書 に より ます と , 構文 法 , 文法 的 語句 配列 
な ど と あり ます 。 

な る ほど 。 つ まり 私 は , 何 か 文 法 的 な 間違え を し ちゃ っ た わ 
け か 。 で も BASIC の 文法 っ て 何 な の か し ら 。 

先生 に 言わ せる と , 表示 の 仕方 一 つ に し て も , きち ん と 方 法 
が ある ん だ そう で す 。 

まあ , まだ 何 も 教 わっ て な いん だ し , 仕方 が な いで す よ ね 。 


PRANTS, 入力 文 を 画面 に あ 
ら た め て 書き 出し な さい と いう ララ 人 症 
DANTE 

PRINT 命令 と は , 画面 に 何 か を 書き な さい と いう 命令 な ん 
ELITE 

きっ き 間 違え た 私 の 名 前 を 正しい 文章 で 書く と , 


Print "shinagawa yuri" (CR 

s nagawa yuri PT 

B の キー は 、 eel 
こん な 型 を し て い 
ます けど 、 [CRIT 
表わし まし ょ うわ ね 。 

GRE P pk o 


と の "は 何で し ょ う ね ぇ ……… 8 


選 HFT| キ ー こ と [] キ ー を 同時 に 押し 
て "を 表示 / 中 に 入る 文字 が 出力 
され ます 


ダブ ルク ォ ー テ ーション を 表示 する に は ,|SHIFT| の キー と 
一 緒 に |25| の キー を お す の だ そう で す 。 ダブ ルク ォ ー テ ー シ ョ 
ン と ダブ ルク ォ ー テ ーション の 間 に は さま れ た 文字 を ,。 コン ピ 
anA PHL CAS EO CT a, 


ラル オー デー ピョン 


=E 
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2 
PRINT 命 令 は 、 省 略 形 が 使え ます よ 。 
(P) (2) を 書い て も 同様 に 判別 し て く 


24 


し まし よう 
な ご 


で は , 今度 は 電卓 代わ り に 使っ て み ま し ょ う 。 じゃ あ , 
PRINT 文 で 電卓 が わり に 計算 さき させ て み ま す 。 コ ンピュータ 君 


で きる か し ら ? (S 


バ ノ ソコン を 電卓 代わ り に し て 計算 
/ 演 算 用 記 守 は キー※ ン 


2) 


print "9+3" 
+3 


Ok 
a 


Peas ot3 
Ok 
* 


そう か が 1! SIM 


あれ 、 変 だ な あ 
[CR] 


クォーテーション は 文字 を 書く と きた に 使う 


SOC, 計算 を する 時 は いら な い の ネ ! 


演算 子 T 


IUS 
ひき 算 
か け 算 
わり 算 


E EEE Cis 


, ELÄ, ひき 算 は 普通 と 同じ だ けれ ど , 
か け 算 ( 米 わ o 算 (/) は , 


と ん な 記号 を 使う ん で すね ぇ 。 


LS, V=RESASCOFIRTC 
Te, 四則 演算 の 帆 は 算数 こ 同 
レ よ 

と と ろ で , 先生 か ら , 誰 で も わか る よう な 質問 を 受け まし た 。 
12 た だ すき は いく つ で すみか? | 

私 は 「5 に 決ま っ て いる じゃ な いで すか | と 答え まし た 。 
「 で は , それ に 2 を か けた ら ど うな り ま すか 」 と 先生 。 

当然 110] と 答え ます よね ぇ 。「 そ れ じ ゃ BASIC で 書い て 
みて くだ さい 。| 

ls 2+23%2 [CR] 

Ok 

E 


Bo, どう し て か な ? ご ぐ と ん な 計算 で も うわ か ら な く な っ 
ちゃ う の か し ら ? ジ あっ …! も し も ゃ , 算数 と 同じ よう に 四則 
演算 に 順番 が ある と し た ら ,「 か っ と | が いる ん じゃ な いか し 
Do ちょ っ と た めし て み ま し ょ う 。 
print (どら + ヨ )※ ど ご RI 
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Ok 
£ 


や っ ぱり 。 KREBS, そそ っ か し いな ぁ …。 

まっ た く 算 数 と 同じ で , PUR, わり 算 は 先 に 実行 し , た し 
A, ひき 算 は 後に な る わけ な ん で すね 。 な ん だ 算数 も BASIC 
も 同じ じゃ な い ! 

YURI の 感想 …… 

何 を や る に も そう だ と 思う けど , ある 程度 の ルー ル と いう 物 
は 必要 で す よ ね 。 ル ー ル の 1 つ 1 つ に ひっ か か っ て いて は , v 
ー ル を 超え た 本 当 の お も し ろ い 部 分 に 触れ る と と は で きま せん 。 

VA, きっ と そう だ と 思う ん で す よ ね 。 元 に な る ルー ル を 早 
く 覚 えて , は や く お も し ろ い プロ グラ ム を 作っ て みた いで す よ 
ね 。 一 緒 に が ん ば り ま し ょ う 。 
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変数 へ の 代入 、 于 算式 等 よ 、 正 確 に は 
LET と 付け る の で すけ れ ど JHuBASIC 
で は 、 そ の すべ て を 省略 する こと が で 
きま す 。 


m 
dad 
O 0 DP 
un dw wt 
Dm 
+ 
T 


幾つ Tororo 
FWAIRMAMA 
ka 
zZ 
一 
e 
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電卓 の メモ リ こ と 同じ よう な 使 し 万 。 
A==] は A こい ラメ モリ を ] に する こ 


電卓 の メモ リ と 同じ よう な 使い 方 が ある っ て 聞い た けど , E 
うい うと と な ん で し ょ う ね ? 

A 三 1 は A と いう メモ リ を 1 に し た いと いう 事 で B も 同じ よ 
うた わか る ん だ けど , C 一 人 BB っ て どう いう 事 か な ぁ 。 なせ 
A+B=C じ ゃ いけ な い の か し ら 。 

BASIC で は 求め る 値 つ まり C を 先 に 書く の が 決ま りな ん で 
すっ て 。C は 結果 じゃ な く て , 求め る 値 だ と いう 事 み た い 。 

で も , 私 な らい き な り PRINT A+B っ て 書い ちゃ うだ ろう 
な bo 
a-1 
Ok 
b=2 
Ok. 
BEIM atb 
Ok 
m 


これ で も , 答え は 出 ま す よ ね ぇ …。 


RKODECERCBELICO=A+ 
B.cosecc-ACOC-Bcevn 
CRASS 


勝手 な 事 を し ちゃ いけ な いと 先生 に し か られ て し まい まし た 。 
先生 は 検算 する つも り だ っ た ん で すっ て 。 検算 する っ て どん 
な 事 な ん で し ょ う ね ぇ …。 


な る 程 ね 。 それ で C と いう 値 に AB を 入れ て 置い た の か 。 
た だ PRINT A+ B で も 答え は 出 て くる けど , と こん な 風 に 検算 
は で きま せん よね ぇ 。 …… 納得 ! (m4) 


lo = 3 - > 4 
HuBASIC で は 私 の 名 前 も 変数 に な っ て し まう ん だ っ て RS UOC E CORREO 
shi nagawa=15 合わ せ を 使う こと が で きま す 。 
k SHINAGAWAYURIWAKEI OD 
j-25 ALGAKU=4 
uri M 
T : 十 i な ん て こと も 出来 ます が 、 間 に スペ ー 
watashi=shinagawa+yurl A ae RE. 
: - メ 、 頭 に 来る 命令 文 を 変数 に する こと 
erint watashi OR Ru. 
Ok PRINT=1 
a Syntax Error 
APRINT=1 
Ok 
と ん な 使い 方 も で きる の ね ぇ 。 
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A=A+] こ と は 、A の 再 定義 を する こ 、 
c コン ビ ピュータ は 、 再 定義 後 の 値 を 
acim 


変 な 式 だ な ぁ ? どう いう 事 ? は じ め に A= ニ 1 だ っ た の に 
どう し て PRINT A は 2 に な る の か な ぁ 。 と と で は , 最初 に 出 
て 来 た A と A= ニ A+ 1 の A と で は 別 の 条件 に な っ て し まっ た と 
考え れ ば 良い みた いで す 。 

コン ピュ ー タ は 再 定 義 さ れ た 新しい 方 の A の 値 を 覚え て いる 
わけ な ん で すね 。 


STRING $ 
A$- —) peed, E 


o ME し て 使え る の 、 変 数 の 
最後 に は 必 き 出 を つけ まし よう ね 

文字 も 変数 と し て 使え る っ て いう 事 な ん だ けど , 今度 は 一 体 
どん な と と を 教わる の か し ら ? 

どう 考え て も , 文字 は 文字 だ し , 数 字 は 数 字 よ ね ? 文字 変 
数 な ん て 聞く と , な ん だ か 古典 と 数 字 が 一 緒 に な っ た みた いな 
変 な 感じ が する な ぁ …。 

大 体 数 字 は と っ つき に くい し , だ か ら コ ンピュータ も ちょ っ 
と ね … と 思っ て た ん だ けど , 考え 方 を 変え る べき か し ら ね 。 文 
字 を 変数 に する 時 は 必ず , 変数 の 最後 に や を つけ る らし いん で 
す が , ちょ っ と や っ て み ま し ょ う ね 。( 写 5 ) 


af=shinagawa 
¿grs mismatch 


Ht, 間違え ちゃ っ た 。 何 が いけ な か っ た の か し ら …。 そう 
だ 1! 文字 を 書く 時 は ダブ プル クォーテーション を 使う ん だ っ て 
確か 前 に 教わっ た の よね 。 それ で は や り 直 し 。 


af="shinagawa" 

Ok 

b$="yuri" 

Ok 

ct=att+bF ? 

Ok Type mismatch 
print of 変数 の 型 が 一 致し て いな い 時 に 出る 
shinagawayuri メッ セー ジ で す 。 こ の エラ ー が 出 た ら 
Ok 文字 変数 か 数 字 変 数 か よく た し か め て 
| | いだき いね 。 
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6 
PRINT A$-*B$ 
と 使う こと も 出来 ます 。 
C$-6$:B$ 
これ は 使え ませ ん 。 
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CS=AS+ES, 2332, X 
字 も 変数 に な っ て 口 員 は ロロ 日 - 
gewevurilz 


で きた 1!! で も 文字 が 変数 に な る っ て いう 意味 が よく わか ら 
な いな ぁ …? 数 字 の 変数 と 同様 に 再 定義 な ん て いう 事 も で き 
る の か し ら ? 
af="shinagawa" 

Segt" yuri” 
Ok 


print af l 
hinagawayuri 


Hon 
A 


な る 程 , こう いう 事 が 可能 だ と いう わけ ね 。 つ まり , ほとん 
どの 考え 方 は , 数 字 の 変数 と 同じ で ,。 ダブ ルク ォ ー テ ーション 
を 忘れ な いで つけ る と いう 事 ね 。 

af="shinagawa" 


u Yuri LL] 


int a$5:b$ — 
nmasauatuum1i 


lowucoooo 
に HA 
[ onl 


: と の マー ク は , セミ コロ ン っ て 言う ん で すっ て 。 直 接 
PRINT で 書か せる 時 に は : で 続け て も いい みた い 。( 呈 6 ) 

と と で , 頭 文字 の と と ろだ け | SHIFT | キー を 押し な が ら 打 っ 
て み ま し ょ う ね 。 それ に Yuri の 前 に スペ ー ス を あけ て 打っ た 
方 が 見 や すい で し ょ 。 文 字 変数 の 場合 は ,A$+B$ は 文字 を っ 
な ぎ あ わせ る だ け の 事 だ か ら , セ ミコ ロン と 同じ 事 で す 。 
a$-2"Shinasawa" 


Ok 
b$=" "uri" 
Ok 
prins atb , 
hinagawa Yuri SHIFT キー を 使っ て 、 
ü 頭 文 字 だ け 大 文字 に し ます 


A A AA A 【 


pup | ay A A A E E, A A 


| | 
| | 1 
[een A | IE A 
an i ed | 
= ER 
are, | 
AIRE ! 
que | 
| | 
a | | 
FT iim Pai y 人 恒 半 還 
[TIN [ud DN es] | RY| | | | | | 
DUE il BED. A A .4 Y ^ | 1] 


| 


cm 
LA 1d 
‘ARERR: 
we | | | | | | | 
“SREB 


bs Y 


ie | | ! F-I- M EI 
| | EST LEO EIL] 
| | | | 
, m. ELI A 
ARA 
1 ニル = | 
i っ | | 
| AE | 
| Ei HOQ 
I a rea 


ANA 
erat 


| 下 Y II 上 


—— ——— 一 一 下 


プロ グ テ ラム を 走ら す 、 プ ログ ラム が 
走る 、 と よく 言わ れ ま すね 。 
そう 、 そ の RUN な の で す 。 


$2 


ZJUZ2LE—HFORISSI SAD 
ます 。 タダ イレ クト モー ド こ は 区 別 し 
て ね 


SH, いよ いよ プロ グラ ム ・ モ ー ド の 勉強 に 入り ます 。 とれ 
が わか れ ば , 自分 で プロ グラ ム が 作れ る よう に な る わけ よね 。 
が ん ば ら な くっ ちゃ !! 

まず プロ グラ ム モ ー ド と ダイ レク トモ ー ド は 別 の も の だ っ て 
いう 事 を 頭 に 入れ て お いて くだ さい 。 それ じ ゃ 実際 に プロ グラ 
ム を 作る の に 何 を 知っ て お か な きゃ いけ な い の か ナ ? 

まず 大 切な の は , 行 番号 と いわ れる 実行 の 順番 を 示す 番号 と 
命令 語 が 必要 だ と いう 事 ら し いん で す よ ね 。 行 番号 っ て いう の 
は 10 番 か ら 10 番 お き に 書い て いく の が 一 般 的 な ん で すっ て 。 


ダイ レク トモ ー ド こと の 違い は 、 行 番 
写 こ 丁 負 語 が 必要 な ここ と 。 そこ で 選 
UN/ 


18 print "Shinagawa Yuri" 


HN? 正しく 打っ た は ず な の た 出 て きま せん よ cc» 
ダイ レク ト と の 差 ! 必ず 命令 語 を 入れ て や ら な いと 。 ave 
ュー タ は 実行 し て くれ な いん で す よ , じゃ あ , な ん て 命令 すれ 
ば いい の ? こと こと で 登場 する の が RUN N! 6x7) 


18 print "Shinagawa Yuri" 


run 
Shinagawa Yuri 
Ok 


と ん な 風 に な る わけ で す 。 も し も る 何 か 間 違っ て いて も RUN 
し な いと ERROR は 出 て と な いん で す 。 


18 prnit "Shinagawa Yuri" 


run 
a error in 18 
o 


と ん な 風 に RUN し た 後 で 表示 され て くる の で す 。 それ に , 
必ず 行 番号 の 順に 実行 し て いっ て くれ ます 。 
18 print "Shinagawa" 
print "Yuri" 
run 
Shinagawa 
pore 
LO eriñt "Yuri" 
26 print "Shinagawa" 
run 


Yuri 
Shinagawa 
Ok 


マロ グラ ム モ ー ド で は ALITO で , 
自動 的 に 行 番号 が 入れ られ る の 。 さ 
BINEUT / 


5410, 20 と 行 番号 は 自分 で 入れ まし た けど , と と で AUTO 
と 命令 すれ ば , 自動 的 に 10, 20, 30 と 行 番 号 が 入り ます ョ 。 
それ で は , 今度 は 実際 に , た し 算 の プロ グラ ム を 作っ て み ま 
し ょ う 。 ぐ 今 ま で の と と ろ , 忘れ て な いか な あ … も う 一 度 確 認 
し て みて くだ さい 。> (m8) 


この AUTO 命 令 を 中 止 す る に は 、 
BREAK] キー を 同時 に 押す 
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と れ は 今 ま で よく 出 て 来 た ダ イレ クト ・ モ ー ド で す よ ね 。 


INPUT Clk, 入力 きる 値 を 決め な 
けれ ば な ら な い の ね 。 これ で ロニ A 


DER, プロ グラ ム *・ モ ー ド で や っ て み ま し た 。 INPUT と 
いう 新しい 命令 が 出 て きた けれ ど , と これ は , "情報 を 与え て 下 
St” と いう 章 味 ち し いん で すま 。 とれ を 実行 する に は , ik 
RUN を 使う の か ナァ タツ まあ や っ て み ま し ょ う ! 
55 
bot! ? は 何だ ろう 。 どう し た らい い の 。 ぐ 私 っ て 新 し 
いも の が で て くる と , すぐ あわ て ちゃ う の よ ネ ! まず は 落ち 
つい て 推理 力 を 働か せる 事 ネ ! > 

? と いう 事 は 何 か 聞 いて いる ん じゃ な いか し ら 。 10 に 打っ た 
の は INPUT A だ か ら , た ぶん 最初 の A の 値 を 決め て くれ と い 
う 事 な ん じゃ な いか し ら 。 

じゃ あ 最 初 の や ? を 1 と し て み ま し ょ うか 。 そし て 入力 し 終っ 
た ら 必 ず を 押す ん で し た ね 。 
2 1 
っ E 


HH? また ? が 出 て きた な あ , じゃ あと れ は きっ と B の 値 
を 聞い て いる の ね 。 


run 
72 


2 D 

3 
a” 

と れ で や っ と た し 算 の プロ グラ ム が で きた ん だ わ 。 とれ と 同 
じ よ うに か け 算 や わり 算 も きっ と で きる と 思い ます 。 さ っ き の 
プロ グラ ム の 30, C ニ A+B の + の 部 分 を 米 , / と か えて いけ 
ぱい いわ け よ ね 。 Cows, わり 算 に し て た めし て み ま し ょ う 。 


も ろ ろ ん 、 外 搭 刀 入 も で きる の 。 コ ン 
ビ ピコ ュー タモ も で 割る の は 不可 能 


2888889 


小数 点 以 下 は ,。 8 けた まで し か 表示 され な い の で , 9 けた め 
四捨五入 され て , 上 の よう に な っ て くる わけ な ん で す , な る 
Ho Ce HuBASIC と いう の は 16 け た まで 表示 で きる っ て 本 に た 
書い て あっ た けど お か し いな ? 

run 

To i 

? B 

Division bu zero in 38 

Ok 

a 


また 変 な も の が 出 て きち ゃ っ た 。 と れ は 何で し ょ う ね ぇ 。 # 
ED BKET, や っ と 納得 ! つま り 算 数 で 考え て も と ん な 計算 
変 な ん で す よ ね 。 0 で 割る な ん て と と は 不可 能 な ん で す 。 コン 


ー タ は ちゃ ん と それ が わか っ て る の で エラ ー と し て 表示 し 
て くれ た わけ ね 。 ご フー ム ! すばらし ぃ >> (m9) 


ここ に どの 様 な 時 で も 0 で 割る こと 
は ゆる され ませ ん 。 あと で 勉強 し ます 


が 、 も し 変数 が 0 に な る よう な 時 に は 
その 計算 を 行なわ な い 様 に 再度 変数 を 
聞き 直す プロ グラ ム に 変更 し な けれ ば 
いけ ませ ん 。 
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GOTO 命 令 は 、 実 際 に 使用 きれ て い 
る 行 番号 に の み 飛 ぶ こ と が 出 き ます 。 
も し 行 番号 の 無い 所 に 飛ば す と 、 
GOTO 1000 
gkastines label 


ジ を 出し て くれ ます よ 。 


Exc と 、 エ ラー メッ セー 
Y 
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SOTOMCRESNAICRNS, € 
の 間 が 繰り 返さ れ て 、 LISLISRU 
「N は 不要 


それ に し て も 毎回 毎回 , RUN を する の は めん どう だ と 思い 


と の GOTO っ て いう の は 何 か な ? 感じ は わか る よう な 気 
が する けれ ど …。 とれ は と と で は 10 番 に 戻れ と いう 事 な ん で す 
っ て 。 つ まり 50 番 に と の GOTO 10 と いう 命令 語 を 入れ て お け 
ば , 1 度 RUN し た だ け で , 10 一 40 を 無限 に くり 返し て くれ る 
っ て 事 な の よね 。 だ か らい ちい ち RUN し な く て も いい し , + 
間 が は ぶな ける わけ で す 。( 呈 10) 


繰り 返し を 止め る の は 加 HIFTI こ 
BREAK) きぐ 続け た いこ と き は 品 K。 
の 後に PHINT 


あれ お か し い 。 止ま ら な く な っ ちゃ っ た 。 無限 に くり 返し て 
くれ る の は いい ん だ けど , 止め 方 が わか ら な いわ 0! と と で , 


止め 方 を 教え て も らい まし た 。|ISHIFT| を 押し な が ら IBREAK 


の ボタ ン を 押せ ば いい ん で すっ て 。 さあ , と これ で ひと 安心 。 


eak in 18 


OD cU cJ 
NS d 


あら ? Ok の 右 下 に . が ある けど , こと れ な ん だ ろう ? 


^, GOTO を 止め た く て , BREAK し た けれ ど , 止め た すぐ 
次 か ら ま た 出し た い 事 も ある わ よ ね 。 Ok に と の . が つい て 
いる 時 は , CONT と 命令 し て や れ ば すぐ 次 の 部 分 か ら ま た 表示 
し て くれ る そう で す よ 。。 な し の た だ の Ok で は ダメ な ん で す 
と の CONT っ て 何 の 省略 か わか る ? 
の CONT で す 。 Ok の 後 ま た RUN を し た っ て 良い わけ だ け 
c, RUN の 場合 は , 必ず 一 番 最初 の 番号 か ら ス ター ト し な け 
れ ば な ら な いわ け で す 。 CONT と RUN の 違い , わか っ た ? 


新しい プロ グラ ム を 実行 する 時 に 
は INEW を 。 今 ま で の プログ ラム が 


2C! € 3 Continue 


新しい プロ グラ ム を 実行 する 時 は 必ず と の NEW を 入れ まし 
ょ う 。 とれ 本 信 れ る と と より 、 今 まで 入っ て いた プロ グダグダ ラム 
が 全部 消え て し まう わけ で す 。 さ あ 新 し い プ ログ ラム を 作り ま 


 5666666666666667 


SJ Jed 038375 


D 
RU 
"m 

tu 

A 

ba 

3 

トー 

e 


Mo 


(111) 


この ちがい が わか り ま すね 。 


点 が 付い て いる 時 は 、 今 止ま っ た 次 
の 命令 か ら 実 行 さ せる こと が 可能 な の 
で す 。 も ちろ ん RUN で は あり ませ ん 。 
CONT で す よ 。 
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13 
倍 精 度数 値 # は 、 有 効 数 字 16 桁 まで 

表示 し て くれ ます 。16 桁 を 越え る 値 に 

な る と 、 自 動 的 に 浮動 小数 点 形式 の 表 

示 に 変わ っ て し まい ます 。 

PRINT -12345678901234 

345678901 23457D+ 


また 倍 精 度 で ある こと を 示す た め に 、 
指数 部 は D と 表示 し て くれ ます 。 同様 
に 単 精度 (8 桁 ) の 時 は 、E と 表示 る 
れ ま す 。 


$8 


# の 記 営 を 使え ば 、 最 大 の | 回 けた ま 
で の 表示 を し て くれ る の ね 


# の 記号 を 使っ た ら …… あれ ? さっ きわ り 算 の プロ グラ ム 
を し た 時 は 8 けた まで し か 表示 され な か っ た の に だ に , 1,2,3,4 … 
ああ 16 け た まで ちゃ ん と 表示 され て る わ 。 さ っ き 不 思 議 に 思っ 
た けれ ど , よう や く 疑 問 解消 !! 

8 ケタ まで な ん て 何 に も 計算 で き な い な あと 思っ て いた けど , 
と れ な ら 安 心 。 国 家 予 算 だ っ て な ん だ っ て , 計算 し よう と 思え 
ば で きち ゃ うわ け で すね 。 

も う 疲 れ て きち ゃ っ た ? 本 題 は まだ まだ と れ か ら だ けど , 
と と で ちょ っ と 一 息 つ きま し ょ う ね 。( 呈 13) 


JVC IB ARI UTE 
EX 国際 人 に な る に は コン ピュ 
ー タ を / 


皆さん 外国 に 興味 あり ませ ん ? Th, と に か く 今 , 外国 へ 行 
っ て みた い の よ ね … 別 に 何 が し た いと いう わけ じゃ な いん だ け 
E, と うい う 時 代 だ か ら , も う 日 本 と か 日 本 人 と いう 枠 な ん か , 
全 々 関係 な いで すね 。 

そう 考え る と 語学 っ て 重要 だ けど , それ と 一 緒 に コン ピュ ー 
タ 知識 も 必要 に な っ て くる と 思い ます 。 なぜ っ て , 簡潔 で 各国 
共通 な も の , 人 類 全 般 に 役立つ も の な ん て , そう いく つも あり 
ませ ん よね 。 今 も も ちろ ん 必要 だ けど , その うち 小学 生 や 中 学 
生 が 学校 の 授業 で コン ピュ ー タ を 教わる と いう 時 代 も きっ と 来 
る ん じゃ な いか し ら 。 つまり, も う 国 籍 も 問わ ず ひ と つの 常識 
(に な っ て し まう と 思う ん で す 。 と に か く 最 近 , いろ いろ な 意味 
T, ぜひ や っ て お か な きゃ っ て 思う ん で す 。 

国際 的 人 間 に な り た けれ ば , 是非 コン ピュ ー タ を ! BAT 
ネ 。 RAMON, お も し ろく な っ て くる し …… まあ , が ん ば 
り ま し ょ う よ 。 そ れ に し て も , カナ ダ で スキ ー な ん て 最高 だ ろ 
うな あ ! 行き た いな あ ・…… ! 
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14 
LIST [CR] と 命令 する と すべ て 
の LI ST を 画面 に 出し て くれ ます 。 
LIST 18 

と 行 番号 を 指定 する と 、 そ の 番号 だ け 
画面 に 出し て くれ ます 。 

LIST 28-48 

と ー で 指定 する と 、 そ の 間 を すべ て 画 
面 に 出し て くれ ます 。 

LIST 36- 


な ら 30 番 か ら 以 降 を すべ て 出し て くれ 
ます 。 
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プロ グラ ム の 内 容 を 全て 画 融 表示 
S3NALIST. 画 直 か ら 消 す の 
DEHE TIE BE 


間違っ て 画面 を 消し て し まっ た り , プロ グラ ム が 見 えな く な 
っ て し まっ た 場合 な ど に は LIST と いう 命令 を 使い ます 。 そう 
する と , 作っ て お いた プロ グラ ム が 全て 表示 され ます 。( 字 14) 


li ooa omoes 
OOOO 
ODO cec 
On zz 
su TT 
OZ+ EC 

4a 33 

[zs 
Go om 


それ か ら , 画面 を 消し た いな ん て いう 時 も あり ます よね 。 そ 
ん な 時 は , [SHIFT] と | CER. | を 同時 に 押せ ば いい ん で す 。 

と と で 注意 し て 欲し い の は , 画面 か ら は 一 度 消 えて も , メモ 
リ さ れ て いる か ら , LIST すれ ば いつ で も , 画面 に 再度 現れ る 
と いう 事 。 

前 に NEW と いう 命令 を や っ た けれ ど , それ と の 一 番 大 き な 
相違 点 が と こと! NEW は と に か く < く 消 し 去っ ちゃ う の で , うか 
つ に NEW し ちゃ うと , 後 が 大 変 で す よ 。 ど う ぞ ど 用 心 ! 

画面 の クリ アァ ( [SHIFT] + HOME) を や り ま し た けど , # 
タン の ト 下 の 方 に 書い て ある HOME っ て いう の は 何かしら ね え ? 

と れ は , カー ソル (プロ グラ ム の 最後 に Ok が 出 た あと に 現 
^58 を 画面 の 左上 の 隅 の 位置 に , 移動 させ る 命令 で す 。 
LION だけ を お す と , HOME を 実行 し て くれ る ん で すっ て 。 

と の 他 に も な どの よう に , 上 下書き わけ て ある キ 
ー が あり ます よね 。 の キー は , ふつ うに 押せ ば 2 が 表示 さ 
れ ま す 。 フ と 書き た けれ ば | カナ | キー を ロッ ク し て お いて か ら , 
を た た け ば OK。 そ し て ・ を 表示 し た いと き に は |SHIFT 
+ を 一 緒 に お せ ば よい の で す 。 

と うい う キ ー は , [SHIFT] と 一 緒 に お し た 時 に , ボタ ン の 上 


の 方 を 実行 し て くれ る 事 に な っ て いま す 。 キー ボー ド の 右端 を 
見 て くだ さい 。 SRT] こん な 矢印 が あり ます よね 。 Ch. 
は カー ソル キー で , 矢印 の 方 向 に カー ソル を 動か し て くれ ます 。 


と と で 少し , KMS, 小文字 の 話 を し て お きま し ょ う ね 。 と 
の BASIC に お いて は , 変数 の 大 文字 , 小文字 は , 全て 同じ も 


の と みな され る ん で す 。 プ ログ ラム を 見 て みて くだ さい 。( 字 15) 


Ok 
HuBASIC cit, A と a は まっ た く 同 じ 変 数 な の ね 。 


判定 文 FーTHEN を 使え は 、 コ ン 
ピュ ー タ が 数 の 大 小 を 判定 し て こく 


判定 文 は IF と THEN と を 必ず 組み 合わ せ て 使わ な く て は い 
け ま せん 。 上 の 場合 , も し A= ニ 1 な ら ば そ と で 終わ りな さい と 
いう 命令 が 20 番 に 入っ て いる ん で す 。 A が 1 以外 だ と 30 番 へ 行 
っ て GOTO 10 の 命令 に より INPUT A を くり 返す わけ で す 。 

"も し 一 な ら ば し な さい ” と いう 判定 文 な ん で す よ ね 。 
THEN の 後に は , どん な 命令 を 入れ て も いい ん で すっ て 。 ちょ 
っ と いた ずら し て みよ うか し ら ……。 (116) 


円 回 0 U カー ツル キー を 使 
っ て 、 直 接 実行 し た 行 が 画面 に 出 て い 
る 間 は 、 修 正 や 実行 を 行なう こと が で 
きま や 。 


PRINT S+# 


16 

判定 文 に お いて 、 実 数 の 時 は 良い の 
で す が 、 変 数 の 時 は 、THEN の 前 に 
は か な ら ず 1 文字 分 の スペ ー ス を 入れ 
な けれ ば いけ ませ ん 。 


IF A=B THEN PRINT "E 
ND" tJ — 


それ 以外 の スペ ー ス は 取り 去っ て も か 
まい ませ ん 。 
IFA=B THENPRINT"END" 
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18 input a l 
26 if a=1 then erint "Yuri" 
38 goto 15 

run 

? 2 

? 3 

T 4L 

Yuri 

2 1 

Yuri 

? | 


お も し ろ い な あ 。 も ちろ ん GOTO で 無限 に くり 返し て いる 
DT, と これ を 止め られ る の は BREAK だけ で す 。 それで は 判定 
文 を 使っ て 大 小 比 較 文 を ま 作 っ て み ま し ょ う 。 


if a=b then print "a wa b to naji" 
if ath then print 3 wa b yori chiisai' 
in RN print "a wa b yori ookii" 

goto 


IF…THEN を 使う と と ん な 事 が で きま す よ 。 さ あ RUN さ せ 
て み ま し ょ う ね 。 


Ont NL AS 
[a COCCO Y 00] 


a b yori chiisai 


と ん な 具合 に 数 の 大 小 を , コン ピュ ー タ が 判断 し て くれ ます 。 
と の よう に IF-- THEN 文 の 活用 範囲 は 広い ん で す よ 。 

と の 場合 , 記号 で 表わす と すれ ば , 不 等 号 を 使う こと に な る 
わけ で す が , て の 不 等 号 は 算数 と 同じ よう に ぐ , > と 書き ます 。 
読み 方 は いっ に 

< less than 
> greater than 
と 呼ぶ の だ そう で す , 意味 は , わか り ま す よ ね 。 


TI SEY な ロッ ツジ し て 、 カナ モー 


に に し て 、 日 本 文 で も 数 の 大 小 を 表 
更 し まし よう 


と の プロ グラ ム を も る もう少し 見 や すく する た め に , カナ モー ド 
で 書い て み ま し ょ う 。 カ ナ ・ モ ー ド に する に は カナ KEY を ロ 
ッ ク す る だ け で OK ! (1717) 


zb then print "a n ロト Ty 
«b then print "an b ヨリ +4%4" 
p then print "a ù b ヨリ オオ キイ " 


C CJC)COCOCUCO 


ù b.3U チイ サイ 
eak In 15 


JUI Y III DONE IA 


Noo 
x 


や っ ぱり カタ カナ の 方 が 見 や すい な あ 。 
人 A= 巳 、 人 A< 曰 な ら 残 り は 必然 的 に 
A>BTAlIB<DASL ELIS 
ご と に な り ま き 。 

さて , さっ き の IF…THEN 文 の プロ グラ ム に も どり ます よ 。 
30, 40, 50 と 3 つも IF-- THEN 文 が な らん で いま すけ ど , 
A=B じ ゃ な いと し て A ぐ で B で も な けれ ば , あと は 全部 A>B 
に な る の は , わか りき っ て いる と 思い ませ ん ? 

だ か ら 50 の IF A>B THEN PRINT “A ハ B ヨリ オオ キイ ” 
っ て いう の は 余分 な ん じゃ な いか し ら 。 つ まり 50 番 に は , た だ 
“A ハ B ヨ リオ オキ イ ” と 書け と だ け 命 令 す れ ば , いい ん じゃ 
な いか し ら 。 何 か 先生 が お か し な 顔 し て 見 て ます けど , Hh, ち 


ょ っ と プロ グラ ム を 書き な お し て み ま す ネ ! カナ を 使っ た 後 は 、 か な ら ず カナ ロ 
ッ ク を 解除 し て お いて くだ きい 。 
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ul 


list 

150 INPUT a 

28 INPUT b 

36 IF a=b THEN PRINT "a n b ト AFR" 
46 IF ath THEN PRINT "a n b ヨ rfr" 
SB PRINT "a n b ヨリ オオ キィ イ " 

66 GOTO 16 

Ök. 

@ 


A>B<ÉBUIZIILILIINE, E 


案件 に AISBKOASLY AMT 
は 大 変 / 


じゃ あぁ 早速 実行 させ て み ま す よ ! 


b b オナ ジマ 
b ヨリ オオ キイ 
b ヨリ オオ キイ 


b ヨリ チイ サイ 
b ヨリ オオ キイ 


Ju J JU fu ia^ 
E- 01m Mor > PRES 


bb! と れ だ か ら ダ メ な の よね 。 や っ ぱり も っ と 慎重 に な 
ら な きゃ ネ 。 そう で す , よく 考え て みる と お か し いん で す よ ネ 。 
A が B よ り 大 きい 時 は 問題 な いけ れ ど ,30 番 ,40 番 の どちら か に た 
あて は まっ て , 表示 され た 後 で , 自動 的 に 50 番 も 実行 し ちゃ う 
事 に な る ん で す 。 

だ か ら 上 の よう な 表示 に な っ ちゃ っ た わけ 。 


A=B, A<BciiS/zUic, GOT 
ロロ CNPUT の 条件 を 確認 する 


で も と の アイ ディ ア は ちょ っ と 捨て が た い 気 が する ん だ けれ 
E esses も うち ょ っ と よく 考え て み ま し ょ う よ 。 何 か い い 方 法 が 
ある ん じゃ な いか し ら …… と と で 悩ん だ あげ くに 思い つい た の 
が 次 の プロ ゲラ ム 。 よく 見 て 下さ きい ネ ! 


list 

18 INPUT a 

2A INPUT b | 

38 lr a=b THEN PRINT "a à b b 1*2" 16070 18 
48 IF ato THEN PRINT "a à b 3) 4/84" 16070 18 
98 PRINT "a n b 3) aati" 

68 GOTO 18 

T 

Ñ 


30 番 と 40 番 の あと に コロ ン を 打っ て GOTO 10 を つけ 加え た 
ん で す 。 コ ロン EX xu, まだ 文 が つづ きま す よ と いう 記号 
で す 。 覚え て お いて 下さ い 。 

と うし て お け ば , さっ き の よ うな 混乱 は な く , 一 応 整理 され 
て くる と 思う ん だ けど , どう か な ? 余分 な 命令 は 省 い て , で 
きる だ け 簡 略 に し た 方 が 難し い プ ログ ラム に な る 程 い い に 決 ま 
っ て ます よね え ! で は ちょ っ と 心配 だ けど , RUNN! 


run 
1 
b ト オナ | ド 


T 
n 
1 
2 
nb ヨリ チイ サイ 
2 
1 
"n 


OM Y YA de 


b ヨリ オオ キイ 
w 


EL SE 命 信 を 使う と 、 320855 
文 を 1 つ に まとめ る こと が で きる の 
で す 

一 応 , すんなり 行 っ て る みた いで すね え , 良かっ た ! có 
先生 は , と れ で を 完璧 で は な いと お っ し ゃ っ て いま す よ 。 

と と で 大 変 便利 な 命令 を , 教え て 下さ いま し た 。 ELSE EW 
う 命 令 な ん で す ! こと れ を 使う と , な ん と 30 番 40 番 50 番 の 3 つ 


の 命令 文 を 1 つ に し て し まえ る ん で す 。 本 当 か な あっ て 思う で 
し ょ う ね え 。 さ あ プ ログ ラム を 見 て 下さ い 。( 呈 18) 


1 行 に 入る 命令 の 長き は 最大 255 XC 


FETCH. MTBF AF ILO 
先頭 に 0 か ら 65534 まで の 番号 を 付け 
る こと に よっ て 、 若 い 番 号 順 に 実行 し 
て くれ る の で す 。 
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ELSE を 使う こと に よっ て 、IF 


文 の 後に 何 個 で も 命令 を 々 つづ ける こと 
が で きま す が 、 前 に も 言っ た よう に 、 
最大 255 文字 まで で す よ 。 
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list 

18 INPUT a 

20 INPUT b 

30_IF a-b THEN PRINT "an b k オナ シラ "リリ ELSE 
IF acb THEN PRINT "an b ヨリ #494" ELSE 

PRINT "an b ヨリ 44+4" 

ca GOTO 16 

Ok 

| | 


プロ グラ ム 上 で 消し た し ! 行 が ある 
CE, ENTES CRER 
9 の で す 


40 番 , 50 番 は , 上 の プロ グラ ム で は , も う 必 要 が な い の で , 
消し ちゃ っ て いい わけ で す 。 消 し 方 は ,|4| [o] [CR], [5] 
lo] と いっ た 感じ で いい そう で す 。 と うす る と 簡単 に な 
SELE? 

ELSE と いう の は , “さも な けれ ば "と いう 意味 で す よ ネ 。 IF 
…THEN…ELSE この つなが り が 重要 ! これ ら は 切り 離し て 
使え る も の で は な い の で す 。( 呈 19) 


だ ん だ ん コシ ピュ ー タ らし く な っ てき て 判定 を し て くれ る よ 
うに な り ま し た 。 と の 先 , どん な 事 が で きる よう に な る の か ワ 
9791 Ch, まだ まだ 完全 公私 の 上 を いっ て いる コシ ン ど ゼ ょ ュ 
ー タ 。 少し 複雑 な 気分 で すね ぇ 。 

と と ろ で TEF…… THEN……・ ELSE の 命令 文 な ん か と っ て みる 
E, まっ た く 英 語 と 同じ だ し , 意外 に 親しみ や すい の よね 。 

数 字 だ けが ぎっ し り 並 ん で いる よう に 思え た ん だ けど …… そ 
れ に 1+1=2 み た い に , 決ま りき っ た よう な 計算 し か 判断 し 
て くれ な いと 思っ て いた の に た , 意外 に 幅 が ある ん で す 。 

そう いう 意味 で は , わり と 人 間 的 だ と も いえ る ん じゃ な いか 
し ら …。 そん な わけ で , 私 の 中 で は , コン ピュ ー タ に 対す る 認 
識 が 少し ずつ 変化 し て き て いる ん だ けど , 皆さん は どう か な ? 
上 手 に 使い こなせ る よう に な れ ば , も っ と 愛着 も わい て , 自分 
の 分 身 み た いな 気 が す る ん じゃ な いか し ら 。 


KIND は ラン ダム 、 そ う で す 、 で ご たら 
め な 数 つま り 乱 数 を 由 す た め の 病 
色 な の で す 

それ で は , 判定 文 を 使っ て ゲー ム の プロ グラ ム を 作っ て み ま 
し ょ う 。 と と で RND ( ) と いう 新た な 記号 が 出 て きま す 。 
と れ は 乱数 と 呼び ます 。 乱数 と いう の は , その 字 の 通り で た ら 
め な 数 。 で すか ら ( ) の 中 に は , どん な 整数 が 入っ て も いい 
けれ ど , 普通 は RND(1) と する そう で す よ 。 ダ イレ クト ・ モ 
ー ド で や っ て み ま し ょ う 。( 呈 20) 

erint CPK1 2 


. 98755252 
ok 
rint mrnditi» 
S digi 
rint rndatdi? 
"89712572 
Ok 
| | 


RND( X) 乱 数 の 引数 X は どん な 数 
字 を 入れ て も か まい ませ ん 。 単なる ダ 
ミー で す 。 RND(1) だ け を 実行 し ま 
す と 、0 以 上 1 未満 の 乱数 を 発生 し て 
(ni, 
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INTEGER と は 、「 整 数 の 」 と いう 意 
味 で すね 。 その他 に も 「 必 要 な 」 と か 、、 


「 完 全 な 」 な ど と いう 意味 も ちあ る の で 
Fi. 「 必 要 な 整数 を 出し て くだ さい 
ね 」 と 覚え まし ょ う 。 


48 


小数 を 整数 に な お すき 探 作 は 、1【 ツ を 
か け て 小数 点 を 移動 させ 、INT で て 小 
Mat ORT! 


で も 小数 点 以 下 の 数 し か 出 な けれ ば , あん まり 利用 で き な い 
ん じゃ な いか し ら ? する と 先生 が 「 算 数 を 思い 出し て どら ん 
な さい 。 小数 を 整数 に する 事 は で きる で し ょ | と お っ し ゃ いま 
Le 
難し い 事 を 言う な ぁ 。 かけ算 を 使う っ っ て いう 事 か ナ ? 確か 
IZ, 0.123456 に 10 を か けた ら 1.23456 に な る わ ね ぇ 。 で も 小数 
点 以 下 の 数 が ある し , と れ じ ゃ 整数 と いえ ませ ん ね 。 と と で 整 
数 だ け 残 し て , 小数 点 以 下 を 全部 切り 捨て て し まう 命令 が ある 
ACT ko 

と これが 1 NT。 イ ン テ ジ ャ ー (integer) と 呼び ます 。 さ っ き 
ORND( ) 乱数 も , と の イン テ ジ ャ ー も コン ピュ ー タ で は 
関数 と 呼ば れ ま す 。(cw21) 


rint int Llsz 
ntax error 


print intiüi1.22» 
Ok 


* 
INT は ( ) と 併用 する も の 。〔 ) 内 に 
RNN を 入れ て 1 つの 病 共 文 に ま 


と の よう に IN 工 を 使う 時 は , 必ず 数 値 を ( ) で 閉じ な く 
ちゃ ダメ な ん で す よ 。 と れ も ル ー ル だ と 思っ て 下さ い 。 


print int¢S.36 
Bras error 


E 
ほらね, ( ) を 閉じ て な いか ら , と ん な 事 に な っ ちゃ っ た 
で も っ 


1 ) 素 1 日 


6: 8445432) 


と うな り ま す よ ね 。 
で も いち いち 小数 点 以 下 を 切り す て る 命令 を する の は , ちょ 
っ と めん どう よね え 。 とれ を 一 つの 命令 文 に は , で き な い の か 


print intinndcioxia8» 


と うす れ ば 一 つの 命令 文 で いい わけ よね ぇ 。( ) が 多く な 
る か ら , 気 を つけ て ネ ! 


に ロ T ロ 恨 を 打ち 込む こ 、 小数 を 切 
OR CESLAAL I< DE. ZSS 
まれ まき 


18 print intnrndii»x180»5 
20 goto 18 


先生 が と ん な プロ グラ ム を 書き まし た 。「 わ か り ま すか ?] 

で すっ て … は い , わか り ま す よ 。 と れ は , さっ き の 乱 数 を くり 
返し な さい と いう プロ グラ ム で すね 。 さ あ そ れ じゃ 実行 し て み 
=i Oe 


ron 


ak in 18 


x7 -JUn 0-0 XC) 


Moo 
"m 
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と ん な 風 に 10 ま で の 乱数 を 出し て くれ る ん だ わ 。 で を 先生 , 
な ぜ 0 が 出 て る の ? 
print .8099x10 
. 99 
Ok 
園 
と の 計算 は 理解 で きま すね 。 0.099 ic10 2» 0 7: 5 € 0. 99, 


そし て 小数 点 以下 を INT で 切り 捨て て し まう の で 0 に な る の で 
Fo 


サイ コロ の 自 の 乱数 を 出し て み ま 
U k ラ / INT (RNDOU)X&) ni 


じゃ あ ち ょ っ と 別 の プロ グラ ム を 作っ て み ま し ょ うか 。 


18 print intírnd(d3x6)> 
“6 goto 15 


6 まで の 乱数 を 出し な さい と いう プロ グラ ム で すね 。 とれ は 
よく ゲー ム に 使わ れ ま す よ 。 な ぜ 6 に し た か わか り ま す ? 何 
か 思い 出す 物 は あり ませ ん か ? そう ! サイ コロ で す 。 じ ゃ 
あ サ イコ ロ の 目 を 出し て み ま し ょ う 。 
run 


an NOUBA 


Mov 


¿EBDELE. ENFADO DALE? よく 見 で 
Faw, 変 な サイ コロ ね ぇ ! HAE, サイ コロ の 目 に 0 な ん か 
な いで し ょ 。 それ 区 6 が な いで す よ 。 困り まし た 和え を え , どう し 
た らい い の か し ら 。 つま り , 1 つ ず つっ 数 が 大 きく な れ ば いい わ 
け よ ね え 。 じ ゃ あ , も と の プロ グラ ム に 1 を た し て み ま し ょ う よ 。 


16 print intinrndci»xeóo»-41 
20 goto ið 
run 


IO A 


eak In 16 


Moo 


Sot! 大 成功 。 と れ で サイ コロ の 数 当て ゲー ム な ん か や 
っ て 遊べ ます よ 。 と れ を 応用 すれ ば トラ ンプ ゲー ム で も で きち 
ゃ うわ け サ け よ ね え 。 ど うそ や っ と それ らし く な っ て きた で し 
ko " 

忘れ な いで 欲し い 事 は , コン ピュ ー タ は 数 を 数 える 時 は 0 か 
ら 数 え 出す の だ と いう 事 で す 。 だ か ら PRINT INT (RND(1)* 
6)+1 の + 1 に 意味 が 出 て くる わけ ね 。( 呈 22) 


サイ の 目 乱 数 A に 対し て 、 BEINP 
UTUTREESZNS, サイ コロ 
数 当て グー ム 


それ じゃ , いよ いよ サイ コロ の 数 当て ゲー ム を 作っ て み ま し 


K Do 

18 a=inttrndti32#6394+1 

20 input y 

30 if a=b then print "Pray I!" 
40 if a て yb then print "nx"lk.." 
a” goto ið 


と れ で プロ グラ ム が で きま し た ね 。 40 番 の と と ろ に た 見 慣れ ぬ 
記号 が 出 て きま し た が , と れ は AB と 同じ 意味 。 “ノッ トイ 
コー ル ” と 読み ます 。( |SHIFT E, と 押し て み 


て くだ さい 。 (23) 


ASINTCORNDCiOK62*1 
A=INTCRND(1)#64+1> 
A=INTC6*RND(4194+4 
この 様 に 乱数 を 発生 させ た い 数 は 、 


後 ど ちら に 置い て も 良い の で す よ 。 


23 
ノッ トイ クオ ー ル は 、 
<> > 

どちら で も 良い で す よ 。 


前 


51 


52 


と の プロ グラ ム , 間違い な いで す よ ね え ? どう 思う ? 2 
れ じ ゃ あ , と に か く RUN! 
run 
? 4 
nz 
ae 
ner ban 
? 6 
TEJA 
? 

Break In 20 
Ok. 


数 当て ゲー ム は 、 人 = 性 が か 合 か を 問 
SRI U C SUO SELSES*G 
て 合理 化 


うま くい きま し た 。 別に 間違っ て いな いけ ど …… 

と て で 何 か 気 づき すま せん? 何 も る 判定 文 を 2 つ に する 必要 は 
な いで し ょ ? A=B 以 外 は 全部 ハズ レ に な っ ちゃ うん だ か 
ら ゥ 一 つの 判定 文 に な る わ よ ね ! さて , どう する ん だ っ け ?? 


(ANDO #6) +l 
i THEN PRINT "791 !" ELSE PRINT "AR be." 


EB -—cneoorso + 
m — 


と れ で いい の よ ネ *, 40 番 は も う 必 要 あ り ま せん 。 
run 


? 
Rn 
? 2 
Pay ! 
? 3 
nb 
2 
Break in 20 
Ok. 
きち ん と で きま し た 。 先生 は た だ < ン > の 説明 が し た か っ た 
の で 最初 あの プロ グラ ム を 作っ た ん で すっ て 。 


7 08S0I-Be OASUW 
¡EAUIZO, ECARLIZIDSS 


COG, も し サイ コロ の 目だっ て いう 事 を 忘れ て , 7 と か 9 
と か 入力 し た ら , どう いう 判定 に な る の か し ら ? 


"mum 
T T 
nA bs 
2.3 
nz ルレ ・ 
v 11 
ロメ マレ ・ 
? E 


な ら な し いい の で 、 B<l Br Be? 
直し させ ます 


と れ じ ゃ 全部 は ずれ に な っ ちゃ っ て ぜん ぜん ゲー ム ら し く な 
いじ ゃ な い ! そ と で , さら 条件 を つけ て , 判定 を 細か くし 
Ce Load 


Wh 


list 

16 a-INTCORNDCi»5x*6»5-1 

26 INPUT b 

25 IF b<i THEN GOTO 28 

26 IF b>6 THEN GOTO 28 

89 IF apb THEN PRINT "79% !" ELSE PRINT 
1 ae 

58 GOTO i18 

Ok 

a 


25, 26 番 に 入れ た 命令 に より , ゲー ム ら し く な っ た は ず で す 
ね 。 つ まり 1 6 以外 の 数 が 出 て きた ら , コン ピュ ー タ は 判定 
せ ず , さら に 聞き か え し て くれ る わけ で す 。( 呈 24) 


dds 


コン ピュ ー タ の プロ グラ ム を 理解 す 
る ため に は 、 と に か 〈《 コ ンピュータ と 
遊ん で みる こと が 一 番 で すね 。 遊 び の 


中 か ら 不 合理 な 点 を 見 付け 出し 、 そ れ 
を 修正 し て 行く の で す 。 そ れ が で きれ 
ば も う あ な た は プロ グラ マー な の で す 
Ke 
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小数 点 以下 を 取り 出す の は 、 FRAC 
(X)、 小 数 点 以 上 を 取り 出す の は FIX 


P 
o 


P 
Q 
x 
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25 


RINT FRACC 2.35) 
. 35 


k 
et FIXC2.35) 
k 


NN 


より 小さ し 数 は 小数 県 以下 だ け 
を 取り 出し な さ し ! こし いう FRA ロ 
TION で 処理 / 


run 
" Aa & 
RT leas 
? 3. 
NA“ bso 
? mM 


qn 


HN? 1 より 小さ い 数 字 と 6 より 大 きい 数 字 は , は ね 返し 
で くれ る けど 。 1.5 が ハズ レ な ん で 記 か し いわ 。 だ っ で て ザ イコ 
ロ ( に そん な 目 な いわ よね 。 と れ は , ちょ っ と めん どう な 事 に な 
り ま し た ね え 。 

と と で 先生 は 悩ん だ すえ , FRACTION と いう 命令 を 教え て 
くれ まし た 。 と れ は どう いう 命令 か と 言い ます と , “PRAY 
下 だ け を と り 出 し な さい ” EV FHRPUALE 5 CT. (ar 25) 
erint Ftracot1.13%2 

42435 


Print fracti) 

e 
print fract3. 4513 

と の よう に 小数 点 以 下 の み を 表示 し , 整数 の 場合 は 0 と な る 


わけ で す 。 とれ を 上 手 に 使っ て , も っ と 正確 な プロ グラ ム を 作 
っ て み ま し ょ う ! 


V 
Imm c+ 


OS TTTZ II 


T *F90 1" ELSE PRINT 


I 


Boul -ororororo-— 
FO OHUNOG- 
a 


サイ の 目 が "より 小さ い " が ' 世 より 
ASL) この 己 つ の 判定 文 は ロ R で 
is DOCS 


と ん な 風 に FRACTION を 使っ て プロ グラ ム を 作り 直し まし 
た 。 乱数 を 出さ せ た 後 , 小数 点 以 下 の ひ の あ る な し を ふる い に か け 
る わけ で す 。 も し , 小数 点 以 下 が あ れ ば , また 20 番 へ 戻り ます 。 
先生 いわ く , も う 少 し スマ ー ト な 形 に し よう と いう 事 で , ちょ 
っ と プロ グラ ム を 書き 直し て み ま し た 。( 呈 26) 


list . 

18 a-zINTCRNDC125x*6»5-41 

20 INPUT b 

22 IF FRAC(b><>0 THEN GOTO 20 

25 IF b<d1 OR b»6 THEN 20 

26 IF b>6 THEN GOTO 2 

p9 IF asb THEN PRINT "798 !" ELSE PRINT 
1 .. 

28 GOTO ið- 

Ok 

a 


さっ き の プ ログ ラム と 比較 し て , 25 番 が 違っ て いま すね 。 26 
番 の 内 容 も つなげ て し まっ た わけ で す 。 そ の た め に 使っ た の が 
論理 演算 子 の OR。 と の 呼び 名 は 覚え て お いて ネ ! 


F~THEN~GOTOONTS.G 
ロ T ロ が な く て も コン ピュ ー タ に は 
わか る の 


OR は 英語 の or と まっ た く 同 じ 使 い 方 。 さ ら に に その後, 
THEN 20 と な っ て , GOTO が きえ て いま す が , と れ は も う 入 れ 単に まとめ ゆる の が テク ニッ ク で す 。 
HuBASIC の 数 々 の すぐ れ た 命令 を 駆 

な く て も 大 丈夫 な ん で す 。 IF…… THEN の あと の GOTO は , 使 し て 、 ス マー ト な プロ グラ ム を 完成 


コン ピュ ー タ が ちゃ ん と 記憶 し て 憶え て いて くれ る ん で す ょ 。 FLEE 


プロ グラ ム は 、 で きる か ぎり 短く 簡 
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ESTI? スマ ー ト に し か も を 正確 に な っ て きま し た よ 。 命 
令 文 が ゴチ ャ ゴチ ャ し て いる の は 間違い の も と 。 で きる だ け 簡 
潔 に ね 。 

SH, また 今 の プロ グラ ム た 戻り まし ょ う 。 先生 は , と の プ 
ログ ラム を まだ 変え たい みたい です よ 。 も っ と 簡単 に で きる ん 
で すっ て 。 本 当 か な ? Có, また 新しい 命令 が 出 て くる の か 
L5? も う 大 分 出 て きた わ よ ね え 。 


ロ R の 仲間 に AIND が あり ます 。A 
IND は 両 万 の 条件 を 充 す 演算 子 な 
の で 

と に か く , 続き を 教わり まし ょ う 。 今度 は AND を 使う ん で 


すっ て 。 な ん で し ょ う ね ぇ ? と れ も OR の 仲間 で 論理 演算 子 
な ん だ そう で す よ 。 


wo 


C13 
)&»80 THEN 28 
D b&6 THEN 38 


EN PRINT "7930 1” ELSE PRINT 


W 
(ymo 0 一 | 
ov DUE li 


OA SWNT 
FO OMANO 
e 


NN 
Mox M M 
S 


6 

gk 
AND の 使い 方 が よく わか ら な いけ れ ど , と の プロ グラ ム は 
いっ た い 何 な の か し ら 。 お か し いな ぁ ? どう し て 1 と 6 は う 
けつ け な い の か し ら …… 。 じゃ あ , ちょ っ と 整理 し て み ま し ょ 


う ネ 。 


5<] OR 日 > 互 の 条件 の 反対 の 条 
件 を AND で 構成 さ は る た め に は ] 
<B<BIZUT: 


A=B A b Bnn ER 


A<B An B ヨリ tito 
A>B An Bau オオ キイ ュ 
ACB Ab Bn 上 トシ ウオ イロ 
AC=B nmn B k オオ BB" B ヨリ F/T a 


A=B ANH B k 423) B ヨリ オオ キイ ュ 


さっ き OR の と と ろ で , B1 OR B>6 と や っ た けど , 
あの 場合 は 1 と 6 を 含ま な い の だ か ら あ れ で よかっ た わけ で す 。 
今度 は 1 ミ zB を 6 と し た いわ け だ か ら コ ンピュータ の 表示 方 法 
€, B>=1 AND B<=6 と し な きゃ いけ な いわ け よ ネ 。 
AND と は 2 つの 条件 両方 を 満足 させ ね ば な ら な いと き 使 う 演 
算 子 で す 。 そ れ じ ゃ , 25 番 を 直し まし ょ う 。 

25 if b>=1 and 5 て =6 then 38 

は い , と れ で や っ と で き あ が り ネ ! も ちろ ん 22 と 25 を ELSE 

で つなぐ 事 も 可能 で す よ 。( 字 27) 


f f cb><>B the 26 else if b>=1 
S" i d Gees dan Ou Biss OB 


論理 演算 子 と 呼ば れる 物 の 中 に は A 
ND、O R の 他 に 次 の 命令 が あり ます 。 


NOT KE 
XOR 排他 的 論理 和 
IMP 包含 


EQV 同値 

AND 論理 積 

OR 論理 和 

一 般 に は この AND と OR が 良 ( 使 
われ 、 他 の 論理 演算 子 は 、 あ まり 使用 
され ませ ん の で ここ で は 省略 いた し ま 
す 。 
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28 

INPUT 文 の 中 に も 、PRINT Xd] 
様 に メッ セー ジ を 書く こと が で きる の 
j Sic ^ 


PRINT" ア ナタ リナ マエ n "SAS 
y" ERRADA 

この 様 に 、 プ リン ト 文 の 中 に 文字 変数 
を 入れ る こと は で き て も 、INPUT 廊 の 
中 に は 入れ る こと は で きま せん 。、 
18 INPUT "アナ 5 ナマ エ ^ 
20 PRINT "アナ タリ ナマ エ n 

T ASI’ E Ze 


この 様 に 書く と OK で す 。 
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メン セー ジ 文 の 入れ 万 は : と 変数 を 
忘れ ず に つけ る こと な の で すす 


と と で , メッ セー ジ の 人 入れ 方 を 教わり まし ょ う 。 た だ の 【?] 


じゃ 何 を 聞い て いる の か わか ら な い の で , と と で は 「 あ な た の 
予想 は ] と いう メッ セー ジ を 入れ て み ま し ょ う ぇ ネ 。 


TT 

18 a-INTCRNDCAOX62 41 

28 INPUT "?*3J 395 n "Eb 

$5 IF FRRCCb) く >8 THEN 26 ELSE IF b>=1 
AND b<=6 THEN 38 ELSE 26 

38 IF ab THEN PRINT "991 i" ELSE PRINT 

"ax L.:":GOTÓ 28 

sa GOTO 18 

Bk 

RI 

run 

r+ ナル 3u0 n ? 1 

TE 

PFI) ヨリ ウロ n ? 2 

b ud CP 

PF9) 39 n ? 3 

nr” kao 

+ ナタ ルリ 319 n ? 5 

Foy | 

7*5) ヨリ り リウ n ? B 


と と で 絶対 忘れ て は いけ な い の が : (セミ コロ ン )。 ELT, 
その あて と 変数 を 忘れ ず に つけ て 下さ い ネ 。 そ うす る と 見 や すい 
SU d 

PRINT 文 の 内 容 も , カタ 仮名 に する と か , いろ いろ 変え ら 
れる わけ で す 。 

SH, 今 せ っ か く 作 っ た ゲー ム を 記録 し て お きた いん で す が , 
どう する ん で し ょ うか ?( 呈 28) 


プロ グラ ム を カセ ッ ト に 記録 し た 
い 時 は SA\E 文 を 使っ て タイ トル 
を 入れ ます 


と と で 出 て くる の が , SAVE と いう 命令 で す 。 記録 し た いと 
き は , と の SAVE を 押し て タイ トル を 入れ ます 。「 カ ズ ア テ ゲ 
um R15 127-7" 


save" ロス" アテ 1I%-G" " 

Aritina"D2" PF T%-« . 

Ok 

m 

save "スパ 了 アテ I*-" カセ ッ ト テ ー プ が 入っ て 
" いな いと 、 こ ん な = 

ae of tape メッ セー ジ が 出 ます よ 

E] 


ALICE Y ERR TUE CA 
か を 確認 する た め に は LOAD 病 
SABIAS 


で は , 巻き 戻し て , 本 当 に 記録 され た か どう か 調べ て み ま し 
ょ う 。 と と で LOAD? と いう 命令 を 使い ます 。 


load? : 
Found "UNIT まき ご a- f 
Ok 


と れ で テー プ の 内 容 と ,. プロ グラ ム の 内 容 が 一 致し て いる こと 
と が わか り ま し た 。 

それ で は , と の ゲー ム を も っ と ゲー ム ら し くす る た め に 10 回 
Po CRTE EOU ELJ 

その た め に 数 を 数 える た め の プ ログ ラム を 作っ て み ま す 。 


10 a=a+1 
28 print a 
30 if a=18 then 58 
40 goto 18 
58 print "end" 
run 

1 

2 

3 

4 

= 

6 

T 

8 

3 

10 

nd 

k 


Hon 
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BASICCISRUN 病没 の 実行 は 
ESTERO DIS SNTE 
えて お し いい て ネ / 


BASIC Cid, RUN 命令 を 実行 する 時 は , すべ て の 変数 は 0 
か ら 始 まり ます 。 

例え ば , と の プロ グラ ム を 理解 する 上 で 大 切な の は 10 番 で す 。 
A=At+1 で は , まず 右側 の A に 0 が 入り ます ね 。 そ うす る と 
左側 の A は 1 に な り ま す 。 つ まり 1 =0 +1 と いう 事 で す 。 

と と で は , 右 と 左 の A は それ ぞ れ 別 の 器 だ と 考え て 下さ い 。 
いつ で も 右 の 方 の A に 先 に 数 字 が 入り , 左側 の A が 1 づつ 増え 
て いく 事 に な る の で す 。 


c 
+ 
Pp 


DJANA P COP) EP 
uugggdggadg 
WuD0-J0 CT B. COP) ES 
十 十 十 十 十 十 十 十 十 
PI PIE IER ER ER ER 


トニ 


A=A+1 

と れ が 全部 A= ニ A+ 1 の 式 の 中 で 行わ れる わけ で す 。 とれ で 
数 の 数 え 方 の プロ グラ ム は いい で すね 。 

と れ を 利用 し て , ゲー ム を くり 返し や れ ば , も っ と 楽し め ま 
py" 


AA= テ A 十 ] の 代わ り に F ロ ドー トビ 
XT 文 で て A を 順次 変化 させ れ ば 、 も 
つこ 楽に … 


と と ろ が , と れ よ り も っ と 簡単 な プロ グラ ム で , 今 と まっ た 
く 同 じ と と が で きる ん で すっ て ? 


neu 
Ok 
16 for a=1 to 18 
26 print 
380 next a 
46 print "end" 
run 
1 
2 
3 
4 
ra 
& 
T 
8 
3 
18 
enc 
Ok 
3 


と と で , FOR-- NEXT と いう 命令 を 使い まし た 。 110% 
COMIC, さっ き の プ ログ ラム と まっ た く 同 じ 事 を と の 命令 は 
や っ て くれ て いま す 。 
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FOR~NEXT を 複雑 に 組み 合わ 
せ て 級数 の 行列 を 構成 する ここ とも 
で きま 


FOR…NEXT は 大 変 便利 な 命令 で , いろ いろ な 使い 方 が で 
きま す 。 た と えば , 次 の よう な 事 も で きる ん で す よ 。 


ið for a=1 to 3 ① 
G for bal 4o 3 


46 next 

58 next a 
run 
1 1 
1 2 
1 3 
2 1 
2 2 
2 3 
3 L 
3 e 
3 3 

Ok 

| | 


と の よう に, 複数 組み 合わ せ て 使え ば 行列 だ っ て で きち ゃ う 
ん で す よ 。 た だ 使い 方 は 気 を つけ て くだ さい 。 ち ょ っ と し た ル 
ー ル が ある みた いで す よ 。 


Ha 
C 
十 
0 
了 
iu 
Il 
HP 


to 3 
for b=1 to 3 @ 


to 3 


| 
OOOO 
0 
3 
0 
| 
pa 


1 to 3 
to 3 9 


Y 


Econ bwe 


without next in 18 


OC OD 
E ues 

コ 

m 

X 

ct 

o 


FR-INEXT の ルー プ が いく ぐつ 
あっ て も し し けど 、 ル ー フ が ロス 
し て は ダメ / 


FOR…NEXT が いく つ で き て も , (D, の よう に 外側 か ら 
順番 に ルー プ が で き て いれ は ば 大 丈夫 ( IE d [を ルー プ 
と 呼ぶ そう で す よ )。 

要する に , プロ グラ ム の 中 で FOR…NEXT の ルー プ が クロ 
ス し て な けれ ば 良い わけ で す 。 

⑬③ の よう な まち が っ た プロ グラ ム を する と , すぐ に , 
Next without for 
For without next 

と いう よう な ERROR 表示 が 出 て きま す 。 実行 する 順番 は , 
行 番号 の 小さ な も の か ら で す よ 。( 呈 29) 

だ か ら , 10 番 が FOR A=1 TO 3 だ っ た ら ペ ア の NEXT A 
つま り 50 番 を みつ け て , 実行 する わけ で す 。 わ か り ま し た ? 


STEP Ss SOS ROE ZS 
Soin STEP IC5SS8 CSS 
の で す 

COC, も う 1 つ 補足 。 と れ ま で STEP と いう 命令 に は 触 
れ て ませ ん が , 今 ま で の 命令 文 は , 実は すべ て STEP が 1 の 
命令 な ん だ そう で す よ 。( 呈 30) 

STEP と は , 変動 の 幅 の よう な も の な ん で すっ て 。 さっき 作 
っ た ログ テム と RUN する と 1。 2, 8, も だ 1 Boros 
く な っ て いっ た で し ょ 。 と て とれ が STEP 1 と いう 事 で , と の 場 
合 だ け は 省略 で きる そう で す 。 と と ろ が , STEP 2 と か STEP 
3 に な る と どう な る か , 実際 に 出力 させ て み ま す ね 。 


FOR か 5 ら NEXT ま で の 間 に あ る 
文 が 、 指 定 さ れ た 回 数 繰り 返し 実行 き 
れ ま す 。 FOR 文 の 変数 に は 、 始 め に 
初期 値 が 入れ られ 、 以 後 この 文 が 実行 
され る た びに 、 1 ケ ず つ 増 えて 行き 、 
最終 値 に な っ た ら 終了 いた し ます 。 


FOR I=1 TO 18 
i4 Lj a 
变数 初期 什 Spor 


な お 、FOR と NEXT は 、 か な ら 
ず ペ ア で 使わ れ ま す 。 


30 
FOR I=1 TO 18 STEP 2 
LJ LI Lt ey 
变数 初期 值 最終 値 增 分 
FOR 文 の 変数 に は 、 始 め に 初期 値 
が 入れ られ 、 以 後 こ の 文 が 実行 きれ る 
た びに 増分 ずつ 増え て 行く の で す 。 も 
ちろ ん 、 最 終値 に な っ た ら 終了 で す よ 。 
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=1 to 9 step 2 
a 


75 ror 


WIM DABA 


mo 


と ん な 風 に な る ん で すね 。 す ご どく 便利 だ と 思い ませ ん 。 


ヨコ TE を 使っ て 九 九 の 計算 を 
させ る に は ん A※ 巳 の A、 BEAT 
プ さ せま す 


と いう と と は …… 応用 で 九 九 の 計算 な ん て いう 事 も 可能 な わ 


うー ん , ちょ っ と 難し い プ ログ ラム に な っ ちゃ うか な ?⑦ o 
か ら な く な っ た とら 先生 教え て くだ さい ネ ! 


BTA 
AN T KA LI L AT AA T hon 
3 
m 
X 
ct 
O 


5 


Qa aang aos ac 
= 


~] op a cc 


~ Qa 


€ oco Oh BS 


ょ っ 
O. 


PM pi s e ce un to cn 


Ihe gr m 


£i CQ) p) P3 P) e e Or DG 
Moh c C Pa 


fr 
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JO 


® Up Bo NN 
mn IO ode P 


Oo 0. Ul [s oP o os 
e» PA (0 rn は -y 00 


Ok 


AV WOBTEREEIRRICERZR S Sica. A 
性 : の よう に 最後 に : を つけ まず す 
どう や ら プ ログ ラム は 正しかっ た みた い 。 Cb, RUN し た 
と た ん , た て 一 列 に 数 字 が どん どん 出 て き て , と れ じ ゃ と て も 
見 に くい で す よ ね 。 先生 何 か 良 い 方 法 は な いで し ょ うか ? 
えっ ! 先生 は 30 番 の 最後 に も ミコ ロン を つけ る だ け で 大 丈 
夫 な ん て 言っ て ます けど 。 ほ ん と で し ょ うか 。 試し て あみ まし ょ 


ウ te 
まず は …… 
list 
ið FOR a=6 TO 9 
20 FOR b= TO 9 
38 PRINT axkb; 
46 NEXT b 
58 PRINT 
66 NEXT a 
TO END 
Ok 
E 
直す の は と れ だ け で いい の か し ら …… ò 
run - 
6 o 日 a 6 a a 日 日 
BO 1 2 3 4 5 67 8 9 
a > 4 6 8 in i12 14 16 18 
6 3 6 9 iz i5 18 21 24 27 
B 4 8 12 16 206 24 28 32 36 
6 5 ið 15 20 25 36 35 46 45 
6 6 12 18 24 36 36 42 48 54 
ð 了 14 21 28 35 42 49 56 63 
6 8 16 24 32 46 48 56 64 72 
B 9 18 27 36 45 54 63 72 81 = 
Ok セパ レー タ 
加 | 
ー : マル チ ス テー トメ ント 時 使用 
や っ た 上 I セミ コロ ン を 使え ば , 横 に 並べ て 表示 で きる の 』 変数 の つなぎ に 使用 
ね ! ちょ っ と し た 違い で , 画面 は 全く 変っ て し まい まし た EN 
! & 2 こ , B id e PRINI 1:2 
大 感激 ! (1731) ok 
PRINT 1,2 
alain wu iia 
Ok 
PRINT "A":"B" 
AB 
Ok 
ELTE "ev > "Bg" 
A 
E] 
数 字 の 前 に は 、 か な ら ず 1 文字 あけ 
られ ます の で 注意 し て くだ さい 。 
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九 九 の 計算 プロ グラ ム は 要する に 
FOR~NEXT XOMISDES 
の で す 

九 九 の 計算 の プロ グラ ム , 理解 し て も ら え た か し ら 。 と と で 
も う 少 し 具体 的 に 説明 し て み ま し ょ う ね 。 

ます ず 行 番号 10 で 1 回目 に A=0, そし て 次 の 行 番号 20 で も 1 
回 目 の B を 0 と し ます 。 

30 番 で は , A 米 B の 計算 結果 を 表示 し , 次 の 行 番号 へ と 行く 
の ひけ で す 。 

Tb, 40 番 に は 2 番目 の FOR—NEXT ルー プ の NEXT が く 
BOT, 20 番 に 戻る 事 に な り , B の 値 は 増加 され B=1 と な り 
ます 。 それから 30 番 を 実行 し ます 。 と の よう な くり か え し を B 
が 9 以上 に な る まで 実行 し ます 。 

B が 9 まで まわ る と , 行 番号 50 の PRINT 命令 に より 表示 の 
行 換え を 行ない , 次 の 60 番 の NEXT で 行 番号 10 に 戻り ます 。 
そし て A が 1 つ 増 え A=1 と な り ま す 。 同じ よう な 事 を A が 9 
cis. URLA To 


tu 
pa 


に に に に に に に に に II 


a=6 


o 


a 


COCOCOCOCOCOCOCUCOCUO) 
DO) JO G1 COPOP- CO CO 
COCOCOCOCOCOCOCOCOCO XX 
VO JG COPOP- OT 


* 
e 
i 
ご 
3 
4 
> 
6 
Fa 
吕 
9 
れ 


DED, と の 表 の よう な 事 が , A が 9 に な る まで 実行 さ 
の で すね 。 

と ん な 風 に 順 を 追っ て みて いけ ば , た いし て 難し くも な いで 
ek De DE E 


る 


FOR-NEXTXCS-TwY-—EfE 
SZTJ. STARTE 
NOS 


FOR…NEXT 文 の お も し ろ さ が わか っ て も ら え た か し ら 。 
それ で は , と と で ちょ っ と 変わ っ た FOR…NEXT 文 の 使い 方 
を 見 て み ま し ょ う ね 。 

実は , タイ マー と し て 利用 で きる ん で す 。 

10 print “start" 
20 for ria to i88 


30 next 
45 erint "end" 


Ob Gone 
DONAR 
p 
I 
= 
3 


と の よう に ,。 NEXT に 変数 を っ け な く て も , コジ シ ピ ュー タ は 
ちゃ ん と どの 変数 を つけ る か を 知っ て いま す 。 か えっ て 変数 を 
つけ な い 方 が , 実行 速度 は は や く な る ん で す よ 。( 呈 32) 


FORCNEXT を 利用 し た タイ マ 
ー は 、 ゲ ー ム 等 で 良 《 使わ れ ま す 。 fik 
を 変え て いろ いろ 試し て みて 下さ い 。 
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じゃ あ , 


プ を LOAD し て み ま し ょ う ね 。 


ゲー ム に 応用 し て み ま し ょ う 。 
TEM 


ゲー ム の 


j c VE » 7. 


Bi 


en cH, 
3 3 SAVE し た 


FOR=NEXTIEE>TESIR 


SAVEUIZ カス アテ ケー ム を 
ACHES 


- に ^ HU o 

Z Z 2 Lr 

xd n HH n 1 d o 

I a lt a — IJ I © 

A 0 AA FB 

2 Q IA 4p 2 可 

Ll Ll 十 

L o L の AJ ha. X 

= J = .] m = I 

"nme 

iz in = o ( = 

Im. -四 一 I- g Jo- 

z Lut Wt] des Luce 

= => = 

Qi s OLE L H "m roule. 
RI S se CI. Tá A) seran X 
z <= z = + d= er. 
Zu 26 Zu HU E Zu = 
ATH ヒ E AcW E O : n コー E l 
+ Iz + TOZ = + TOZ c 
y SEM +6 acc IJ 2) ya ^E I-A r 
D zs 14 A D i = bz 
x mo zn で x moz H A Pr E 

Po Au 本 |J ^ Al (y ーー x ^ Au 
HAWTIZ m IH- VIZ a [E] 的 要 一 YY 工艺 > 一 
th Bl i ELIO "Y ~ PSI Lu = 
m a+. Tr R Ono Tr 回 = OOo IL m A 
Zr AU rzZm-pr-o に (ID EZ Z に 
K w= Ol Om Es QT © Es Oll = Ue 
Ro て ロコ WIS q て wo. っ |J" TUG NT 
z r-r-Q Il = M Il =Œ Q I = G Irol = tr 
デコ し ".O ZO nse Y K X “ZL " Z-Z 
で Il テー SS M Œ I ZUZU sl N EIZ zu ŒW 
qs 和 Q A po Y RS PO nmn AZA 

~ mt 
O O.x ADO mE U = DON MD ド R Hb XU = OON  COCOCOCOCO x 
SLO SAAC! Os MON 一 由 -Nm 0: HOR 1 \ ANACO) OituxDoli 


H 
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rum 

i93) ヨリ ロロ n ? 2 
Pau | 

eae. qun n ? 5 
nz" b.e 

t3) 3un n ? 6 
Pau ! 

feos ョ um n ? 3 
A ba a 

『 ナ タリ ge n 2 4 
na bao 

FAY) カイ ヌス ウー= 2 
Ok 

# 


5 回 の トー タル で あたり の 回 数 を 出し て くれ ます 。 


RENUM@S < 1B S= wv 
FUREBSSCHTSSEMOT< 
NES 


さて 次 に , 行 番号 を RENUM |CR| を 使っ て 10 番 か ら 10 番 
お き に きれ い に そ ろ え て み ま し ょ う 。 


"ru 


ZU Peed Oct 
AMA NZ NZ il A 
oO 
DAD ^P 

We 


a 
c 
3 


ñ 


DZD Dra Het 
ama mzazi g 


RENUM は リナ ン バ ー と 言っ て 、 
LSE IF b>=1 行 番号 を きれ い に そ ろ え て て れる 命令 
LER : Tt. RENUM CRUE, 
し x=x+1: GOTO 10 番 か ら 10 番 むき に そろ えて くれ ます 。 


Tonk bow © RENUM 108-10: 18 
新 行 番 号 昌行 番号 増分 


Moon-10-34 トロ ロビ デー つう OOUAUIO Fn 一 
00000 DO OOOO NOD e 


旧 行 番号 で 指定 し た 行 番号 を 、 新 行 番 
号 で 始ま る 行 番号 に 付け 替え ます 。 新 
し い 行 番号 は 、 増 分 の 一 定 間隔 で 増え 
ほら ね 。 プ ログ ラム が 完成 し た ら , と の RENUM を 入れ て ます 。GOT0、GOSUB な どの 飛 
び 先 の 行 番号 も 同時 に 変化 し ます 。 た 
きれ い に 番 号 を そろ えま し ょ う 。( 写 33) だ し 、 新 行 番号 は 旧 行 番号 より 大 きい 
事 。 よろ し いで すか 。 
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Frar 
ASC カズ アデ "に 成功 する か の 
ai FE 


ST, 数 あて ゲー ム が どん どん 長い プロ グラ ム に な っ て 来 ち 
ゃ いま し た が , 大 丈夫 か な ? Th, ひと つ ず つ 理 解 し て いけ 
i$, そん な 難し く は な いみ た い 。 

私 に も つい て 行け する ん で すか ら …… o で も , 先生 に も 困っ た 
も の で す 。 お も し ろ が っ て , どん どん プロ グラ ム を 変え ちゃ う 
ん だ も の 。 | 


list 

ið a-INTCXRNDC1»x*x1808»-71 

28 INPUT "?PF9) ヨリ ウロ リョ ロ 

30 x=x+1 

46 IF a=b THEN 806 

58 IF a>b THEN PRINT "*4"ztT"w3" 
66 IF atb THEN PRINT リオ オキ スキ “ルル ヨリ 
7H GOTO 28 _ 

ZH PRINT x:"nh4r" 5"4t4h4 ti" 

= 


何 回 で ~ カ ズ ア デ テ " に 成功 する か "っ 
その プロ グラ ム の 構造 は 試行 錯誤 
で 的 を 絞っ て … 


今度 は どん な プロ グラ ム に な っ ちゃ っ た ん で し ょ う 。 1 行 ず 
つ 見 て み ま ly & 2) Dg 


EF, 行 番号 10 で 1 一 100 まで の 整数 を で た ら め に 選ば せ , 
と れ が a と な り ま す 。 
20$ v, アナ タダノ ョ ヨッ ソウ LALA, セミ ョ ロジ 必 お あと 
に b を 入れ ます 。 ゲ ー ム を する 人 に b の 値 を た ず ね る わけ で す 。 
30 番 で 。 x=x+1 と いう 前 に や っ た あの 数 を 数 える 時 の 式 
が 出 て きま す 。 忘れ ちゃ っ た 人 は , 数 あて ゲー ム を 10 回 や っ て 
統計 を と っ た 箇所 (P60) に 戻っ て みて くだ さい 。 

40 番 か ら a と b の 大 小 比 較 で す 。40 番 で は , a = ニ b な ら ば 予 
想 が あたっ た わけ で すか ら , 80 番 の x :“" カ イデ ダイ セイ カイ 1 リ ”" 
へ 直接 行け と 命じ て いま す 。50 番 , 60 番 で は , 予想 が 小さ すぎ 
る か 大 きす ぎる 場合 に . そう 表示 し ます 。 大 きす ぎる か , 小さ 
すぎ た 場合 に は , 次 に 70 番 へ き て , また 20 番 の “アナ タ ノ ョ ヨン ソ 
9” > b へ 戻り 9。 くり返し 聞い て くれ ます 。 

と これ が a=b に な る まで くり 返さ れ , 当たっ た 時 に は , 何 回 
で 当たっ た か が 80 番 に より PRINT OUT され る ん で す ョ 。 以 
上 で と の プロ グラ ム の 説明 は 終わ り ! 

SH, は や く ゲ ー ム を し て み ま し ょ う よ 。 


run 
779) 395? SB 
オオ キス ズ スキ“~ 上山 ヨ 
ア か ロリ 3977 Sb 
チイ サス ズ スキ“ LA 
t5) 399? 46 
オオ キス ズ スキ“ E 
7*5) 395? 35 
AAFAZFY LS 
279) ヨリ ウリ 34 
AAFRF LA 
よび かり) ヨリ リピ Se 
オオ キス ヌキ "上 し ヨ 
t931 3097 31 

T Dr" 9"4t4h4 |! 
Ok 
x 


50% ¿60% i4 ELSE CO "37 C, 1 つの 命令 文 に する と と だ 
っ て , も ちろ ん 可能 で す よ ! 

SB if ab then print "Z4"ztT"ni3"else prin 
t "オオ キス キル ヨリ 


と れ で 60 番 は 不要 で す ネ 。 
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(734) 


(135) 


34 
IF 文 の 後 の GOTO は 省略 で きま 
oTO 80 
F AZB THEN 88 
ちら も 同様 の 動き を し ます 。 


gr 
I 
I 
E 


35 

"ED4$k* TUE" 32DCV Or ND" 

この 時 Y と N は 大 文字 か 小文字 か を 
よく 確か め て 入力 し て くだ さい 。 大 文 
字 だ け 判 断 し て いる プ ブログ ラム は 、 小 
文字 の 入力 は 受け 付け ませ ん 。 も し ど 
ちら も 判定 する た め に は 、 
IF A$="Y" OR As$="y" 
THEN 5 


と 書き か えて 〈 だ さい 。 
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CL Sia Bim«RUcCU«SeS.89 
中 の 文字 変数 も 使う こ Y 握 己 , NO の 


と と で , 画面 を 全部 消し て か ら 始 め な さい と いう 命令 を 覚え 
て お きま し ょ う ネ 。CLS と いう 命令 で す 。 と れ を 5 番 に 入れ て 
お ぉ お く と , 実行 する 時 に きれ いな 画面 が 出 て きま す 。 更に ゲー ム 
を お も し ろく する 為 に も う 2 つ 程 命令 文 を 加え て み ま し ょ う ね 。 


list 
5 CLS 
180 a-INTCORNDCiox*180241 
26 INPUT "PFS! 3u5":pb 
30 x=x+1 
40 IF a=b THEN 80 
SB IF a2b THEN PRINT "*4%2+"43"ELSE PRIN 
T O"A4AFZF LS" 
78 GOTO 28 ] 
80 PRINT x:"n4r" 5"4t4n« |!" 
98 INPUT "モウ イチ ト “ 了 リヒ ヾ マズ Cu or n "as 
1880 IF a$-"u" THEN 5 
110 PRINT "nx n"? i 
Ok 
= 
と と で , 90, 100, 110 が 新しく 加わ り ま し た 。 90$ ca $ が 


出 て きま し た ネ 。$ は 覚え て ます か な 。 文 字 変 数 で し た よね 。a$ 
が "Y" な ら ば , 5 番 に 戻っ て も う 1 度 画面 を 消し な さい と い 
を , 100 で 与え を て いる わけ で す 。 

3487 SB 


=> 


AE oe 5 


B 


PRINTX DIM 文 
IF} | 


今度 は 家族 
グラ ム 、 PNT 文 と FF 文 が 中 心 で 
El 


さて , 先生 が 今度 は , 私 の 家族 構成 を コン ピュ ー タ に 記憶 さ 
せ て お と うと 言い 出し まし た 。 ど ん な 風 に な っ ちゃ う の か し ら 『\ 


neu 
k 


16 CLS 
20 PRINT "xo シナ カド ワー T 2 MUA 
コロ PRINT "SF" RO Tayo z1" 

496 PRINT "シナ カワ 

SU PRINT "ラオ カワ 

6@ PRINT リ シ オ カド で ユリ zg" 
70 PRINT "SiN" 

ea INPUT "2 L 3 


1 
1060 IF a=2 ^ 
116 IF a=3 THEN 3848 
120 IF a=4 THEN S386 
13 IF a=S THEN ¿ut 


2@@ CLS " 

210 PRINT "“Staep rey oe 

228 PRINT "チチ Sát n 

238 INPUT リコ ヨロ シイ テマ カー iv or "jas 
290 IF a$-"v"THEN iG 

254 GOTO 260 

sag CLS 

318 PRINT "ナカ "ロー スミ エリ 

2280 PRINT "nn 对 了 雪人 

338 INPUT "age4*»"zzh iv» or n)"jas 
@ IF a$z-z"y,"THEN 140 

a GOTO 3860 
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(1736) 


この よう な プロ グラ ム の こと を 、 フ 
ァイル 検索 ゲロ グラ ム と 言っ て 、 色 々 
な 応用 が 考え られ ます 。 Eau, va 
「ー ド の 整理 等 、 楽 し いで す ぞ 。 
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460 
41a 
4z@ 
438 
44g 
950 
za 
510 
a2 @ 
530 
540 
550 
sua 
á18 
626 
$30 
644 
456 


CLS 

PRINT "zf5*7? +2” 
PRINT "2303" 3 2994" 
INPUT "230347" 23D iv 


IF a$z"»"THEN 16 
GOTO 4464 
ELS 


PRINT "NO 19^ 
PRINT "ys 20%" 
INPUT "s30545*25 Cy 
IF a$-"y"THEN 10 
GOTO 566 

CLS 

PRINT リツ シ ナ カド ワー ナウ リ 
PRINT "fjs^a  1894' 
INPUT "a ヨロ シイ テラ "スカ Cy 


IF a$-2"»"THEN 16 
GOTO “an 


or 


or 


or 


ni"jias 
noe" seas 
nd"Sst 


ON~GOTO (次 に 行く 番 写 を 指 
ESS) 文 を 使っ て | ビ 文 を 1 つ に ま 
と め だ ら … 


ずい ぶん 長い プロ グラ ム で すね ぇ 。 と れ な ん と か 短 か く な ら 
な いも の で し ょ うか ? 例え ば , 90 て 130 ま で の 1F ME, E 
うに か ーー つ に まとめ られ な いも の か し ら ? 何 度 も 同じ 事 を 聞 
く の は 大 変 よ た ね! そこ と で 次 の 命令 に 注目 ! 

98 on a goto 200, 300, 405, 500, 600 


16 CLS 

20 PRINT "xx 32D" 7 J) カリ "ワー xx" 
30 PRINT "シナ カロ T4u"9 wl" 

40 PRINT "リナ “ロロ RSI =2" 

ee PRINT *2720"9 TX 23" 

60 PRIMI Sorat? ユリ =4" 

TO PRIMI "また DU 2 $9 =5" 

S@ INPUT "5", 3 232) "sa 

98 ON a GOTO 200, 368, 400, 500, 600 


便利 で し ょ 。 と れ が ON--GOTO で す 。 と れ は , a に 入る 
変数 に より ど と へ 行く か が 決ま っ て くる ん で すっ て 。 でも, ま 
だ と の プロ グラ ム 長 いわ よね ぇ 。 同じ 事 く り 返 し て 聞い て る し , 
な ん と か な り そ う ネ 。 先生 が ずい ぶん 短 か い プロ グラ ム に 書き 
か えて くれ た ん だ けど , す ど く 難 し そう な の よね 。 ち ょ っ と 見 
て くだ さい 。 (537) (38) 


37 
ON=GOTOX 
ON A GOTO 100, 2008, 308 


A の 値 が 1 の 時 は 100 番 へ 、 2 の 時 は 
200 番 へ と ジャ ンプ し て 、 そ れ 以 降 の 行 


を 実行 し ます 。A の 値 に 対応 する 行 番 
号 が な けれ ば 、ON 文 の 次 の 実行 を 行 
いま す 。 な お A の 値 が 整数 びな けれ ば 、 
小数 第 一 位 で 四捨五入 きれ た 値 に な り 
ます 。 も ちろ ん この A は 変数 で す の で 、 
どん な 変数 で も か まい ませ ん よ 。 

ON YURI GOTO 180,200 

: 380 


: 38 
いよ いよ 本 格 的 データ ・ ベ ー ス プロ 
グラ ム に 挑戦 し て いた だ きま す 。 D- 


IM、READ-DATA、 こ の 命令 
を 使い こなせ た ら 、 も う 一 人 前 な ん で 
す ぞ 。 し っ か り 勉 強し て くだ きい ね 。 
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39 
DIM 74»-2a-(ems) 
DIMAO DIM Ag(10) 

配列 名 添字 文字 配列 名 添字 

配列 変数 の 名 前 と 、 そ の 添字 の 上 限 を 

設定 し ます 。 1 つの D I M で 、 複 数 の 

配列 変数 を 定義 d せ る こと が で きま す 。 

D I M の 実行 後 、 数 値 型 配列 に は 0 が 

入り 、 、 文字 型 配列 は 、 ヌル スト リン グ 

a( ) に な り ま す 。 
配列 変数 の 添字 の 上 限 を 越え た 指定 

を 実行 する と 、 

DIM Ac40» な の に 、 

向く 11 )=1 な ど と する と 、 

に out of ran 

gi 

の エラ ー メ ッ セ ー ジ が 出 て きま す の で 

ご 注意 下さ い 。 
配列 は 変数 を 入れ て お 〈 箱 な の で す 。 

この 箱 を 何 個 使 うか を 、 初 め に 宣言 し 

て お く の が D I M 文 な の で す 。 

1 2 3 f 4 5 6 7 8 9 1 
ITTILLET] 

A は 10 個 で す よ 

この 配列 の 中 に は 2 次 元 、3 次 元 な ど 、 

メモ リー の ある か ぎり 指定 する こと が 

で きま す 。 FEE RIK 
A(10,10> 2 次 元 配 列 
12345678918 


この 様 に 10x10 の 箱 を 用 意 す る の で す 。 
$ = ACT,23 

* = AC4;, 4) 

$ = A(6,7) 

と 、 そ れ ぞ れ の デー ター を し まっ て お 
《 整理 箱 な の で す 。 

if. 3 次 元 配列 は ルー ビッ クキ ュ 
ー ブ を 考え て 下さ い 。 
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DM( デ ィ メ ンジ ョ ンー 次元) は 配 
ERIN ORES 


16 DIM si(53)323C05)3t(5) 

26 CLS:PRINT "xx 2*0"? 7 J hy"5 xx" 

me s$ici»-"ntfh"n カイ Um ルー ニー" チチ = ララ 
40 sS&0i2)a"tf*g 221 "efi ni" rtis 

> iii キヌ "iz$i22-2'$43n"n»"3":it( 
58 きく 4) ニ リウ ナ カド 10 — "tiz$(4Dc"u"y*a"it(4 
78 gs05)="9+0"0 tu “sz2$(5)=" "try "a "14065 
75 FOR i-i T 

76 PRINT s#C1i33"="si 

7? NEXT 

880 INPUT "9*L 3 372) "sa 

266 CLS 

2180 PRINT s#¢a> . 

220 PRINT z$Cad,tCadi"te" 

230 INPUT "30214720 Cu or n)"jas$ 

240 IF_as$="y"THEN 26 

258 GOTO 206 

来 来 UTD" T + DIO EN 

227079 了 证 更” 让 三 1 

ッ ナ カワ Zl = 2 

DIES TX = 3 

24077 ユリ = 4 

9 ま 9 まり = > 

"し v2» 了 图 

2t])"9» 14 

ラッ リド ヨ 20 td 

3Uu»4T"zh (y or ni? B 

ahn qu» 

++ - 

ヨロ ジリ イエ“ スズ Cu or n»? B 


と の DIM は ディ メン ジョ ン (次 元 ) 配列 変数 で す 。 最初 か 
ら 知ら な い 命令 が 出 て き て , と ま ど い ませ ん で し た ? 辞書 を 
ひい て みる と , 次 元 と いう 訳語 が 出 て いま し た 。( 宮 39) 

と れ を 使え ば , 文字 変数 の 数 の 範囲 が 指定 で きる ん で す 。 C 
の プロ グラ ム は ちょ っ と 難し い の で , 配列 変数 の み を わか りや 
O<RT ESET UP SASAA CHE Lg 


DM 文 で 指定 し た 配列 数 台中 () を 
FOR-NEXTXCT— E 0918 


y ~~ " LL] "m 
i これ は 、A (3,3,3) 上 3 次 元 配 
I 列 に な り ま すね 。 上 面 の 真中 は 、1 段 
" 目 の 2 列 目 の 2 で すか ら A(1, 2, 2) 
" と いう 箱 に な る わけ で す 。 こ の よう に 、 
DIM は 変数 の 収納 箱 の こと な の で す 。 
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と の よう に , は じ め に デイ メン ジョ ン で 配列 数 を あげ , その 
範囲 内 で FOR-NEXT に よっ て 配列 を 指定 で きる わけ で す 。 と 
言っ て も よく 分 か ら な いで し ょ 。 順 を 追っ て 説明 する と , 10 番 
の DIM s$ (5) で s$ の 範囲 は 5 で ある と と 。 つ まり SF 
の グル ー プ に は 5 つの デー タ が 入っ て いる と と が 示さ れ て いま 
Fo DIM と は 順序 づけ を 行っ た 値 の リス ト で , 私 達 は その 中 
か ら 好 き な デ ー タ を 取り 出す と と が 可能 な ん で す 。 

( ) 内 の 数 は 次 元 と 呼び と れ が 1 つ な ら 1 次元, 2 つ な ら 
2 次元 と 言い ます 。 ち な み に と の プロ グラ ム は 1 次 元 ス トリ ン 
グ 配 列 で す 。(DIM s (5) な ら ば 1 次 元 数 値 配列 , DIM s$ 
(5) な ら 1 次 元 ス トリ ング 配列 に な り ま す ) 

1 次 元 ス トリ ング 配列 で ある と の プロ グラ ム の 中 か ら , 部 分 
的 に デー タ を 取出 し て み ま し ょ う 。 

TO for i=3 to 4 
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ほら ね 。 と うい う 事 も で きる わけ で す よ 。 配列 され て いる デ 
ー タ の 中 か ら だ っ た ら , どん な 形 で も デー タ は 取り 出せ ます 。 
プロ グラ ム の 中 で 20 番 か ら 60 番 が デー タ の 箇所 で す 。 


DIM 文 で 配 タ 以外 の 数 字 を 指定 す 
る こ 、 当 然 の こと な が ら ビ RROR 
が 出 ま す 


list 

16 DIM s#c¢53 : i 

20 s$cilo'"nsin"no T7475" 
号 日 z$i2»2"n*h50"70 REL" 

40 z$i»-2"nthb"2 FR" 

SÖ stre 37103 A 

66 z$ico)z'"nfsp"n0 Fy" 

Y FOR i-1 TO 6 

35 PRINT sti) 

96 NEXT i 

Ok 

run | : 

IFF qiu*9 

Sftfü*29 231 

FDO TX 

sjy 1H 

リナ リロ +i) 
Subscript Out of range in 868 
x 


配列 外 の 数 まで 要求 する と , 上 の よう な 表示 が 出 て 誤り で あ 
る 事 を 教え て くれ ます 。 10 で きめ る 配列 変数 と 70 で 指定 する 数 
の 範囲 が くい 違っ て いて は いけ な いわ け で す よ ね 。 


複数 の 配列 変数 ( 己 . ご .T) を 使え ば 、 
デー タ を 各 ブ ロッ ク に 分 類 定義 で 
きま す 


75 if iX1 or i55 then 20 

最後 に この よう に リミット を も うけ て お け ば , さっ き の よ う 
な エラ ー の メッ セー ジ は 出 ま せん よね 。 

配列 変数 の ポイ ント は わか り ま し た ね 。 そ れ で は , さっ き の 


最初 の プロ グラ ム に 戻っ て み ま し ょ う 。 

と の プロ グラ ム の 10 番 に は , 3 つの 配列 変数 が 使わ れ て いま 
to 違う 文字 で あれ ば , と の よう に 幾つ も の ブロ ッ ク と し て , 
デー タ を 分 類 し て 定義 むす る と と が 可能 で す 。 


s は …SHINAGAWA と いう と と で S を つか いま す 。 
2 は … つ づき 柄 
t は … 年 令 


(⑧ 年 令 の 場合 は 数 字 変数 , この DIM t ( ) は 一 次 元 数 値 配 
列 で いい の で は つけ ませ ん で し た ) 

と いう 事 で 入れ て み ま し た 。 

今度 は READ-DATA と いう 命令 を 利用 し て , も っ と プロ グ 
ラム を 簡単 に し て み ま し ょ う 。 READ と DATA は 必ず ペア で 
使っ て 下さ い ネ ! (rw40-A) 
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My USS" 5s SB 5 25TH" 2 «T7. 
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Pr Dee DAZ 
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w 
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`“ 


Mov -eeeppbÀ2pbpimpo-JOUd Op 
CIN EO COCOCOCOCOCOCOCOCO CU "- 


DATA は どの 位置 で も か まい ませ ん 。 コ ンピュータ は ど と 
に あっ て も READ の 命令 が あれ ば DATA を 探す ん で す ! 
READ~DATA を 使っ た お か げ で 命令 が 整理 され て 大 分 きれ い 
eek Eb ka 


40—A 
READ DATA 
DATA 文 用意 され た デー ター を 

読み 込ん で 、 変 数 に 割り 当て ます 。RE 

AD 廊 は いつ も DATA 文 と 対 に し て 

使い 、DATA の 定数 デー ター は 、RE 

AD 文 の 変数 と 1 対 1 に 対応 し ます 。 

また 、 そ れ ら は 同じ 型 で な けれ ば いけ 

ませ ん 。 1 つの READ 文 で 2 つ 以 上 

の DATA か ら デ ー タ を 読み 込ん だ り 、 

い 〈《 つ か の READ 文 で 、1 つ の DA 

TA 文 を 共用 し て 読み 込む こと が で き 

ます 。 
いずれ の 場合 も 、DATA 廊 は 行 番 

号 の 若い 順に デー タ の 並び の 先頭 か ら 

読み 込ま れ 、DATA 文 の 定数 デー タ 

の 数 が 、READ 文 の 変数 の 数 より 多 

いと き に は 、 次 の READ 廊 に より 5 引 

き 続 き 読み 込ま れ 、READ 文 が な け 

れ ば 、 残 り の 定数 デ ゲー タ は 無視 る れ ま 

す 。 
デー タ の 数 が 不足 し て いる と き は 、 

Out of data 


の エラ ー メ ッ セ ー ジ が 表示 され ます 。 
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文字 列 を DATA と し て 用 意 す る 場 


合 、 ダ ブル クォーテーション (` "yc 
まな 〈 く て も 使用 する こと が で きま す 。 

DATA »*5*5,3203,22^* 

:55,?4t"ng 


41 
RESTORE (リス ト ア ) 
DATA を 一 度 読み 、 再 度 読み 込む 
必要 が 出 て 来 た だ 時 は 、 こ の 命令 で デー 
タ の 初期 化 を 行い ます 。 
DATA 廊 は 、 一 度 読 まれ た ら 2 度 


と 読む こと は 不可 能 で す 。 し か し 、 こ 
の RESTORE を 実行 する こと に より 、 
再度 読み 込ま せる こと が 出来 る の で す 。 
この 本 の 最後 の 応用 ゲロ グラ ム 世界 
の 国々 ” を 参考 に し て みて くだ さい 。 
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READーDATA 文 の 内 容 を 実際 
に ナン バー ご お り に 呼び 出し て み 
まし た 


じゃ あ , も う 少 し READーDATA の お 勉強 を し まし ょ う ネ 。 


や 
list l 
18 DIM a ま (5 ぼ ) 
20 FOR i-1 To 5 
30 READ a$c1> 
48 MEAT i 
SQ INPUT a 
68 PRINT a$6(a»2 
"8 GOTO SB 
18€ DATA "»fn*02"."323n2","290^4*","5q2","fg 
Qk 
a 


私 の 名 前 に 合わ せ て , DATA は 車 の ナン バー に し て み ま し た 。 
いい アイ ディ ア で し ょ ! (m40-B) 
RUN し て み ま し ょ う 。 


DATA は 並べ た 順に 1, 2, 3… と な り ま す 。 と の 命令 も , 
上 手 に 活用 すれ ば 大 変 便利 な も の な ん で す ョ 。( 写 41) 

も し デー タ の 数 が 20 番 で 指定 され た も の に 足り な けれ ば , 
RUN する と …… 


Qut of data in 3 
Ok 


Gi 


と いう よう な 表示 が 現れ ます 。 
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RL ZO 


S Y UE :C$-A$ *B$: pe 


fen 


A 
2 ーー OA 


tonnes parara AZ 
Nop >, 


^ 


STRINGS "" CERETUZXEE 
OREO, BRAMNCORE AIC 
ReDIF TR! 


だ ん だ ん お も し ろく な っ て きま し た か ? それ と も , わか ら 
な く な っ て きち ゃ っ た 了 7 ア Th, と ここ で あきらめ る の は まだ 早 
い ノ さあ が ん ば り ま し ょ う 。 

次 に 勉強 か する の は スト リン グ 処 理 関数 で す 。 ス トリ ング に つ 
いて は , も う 触 れ て いま すね 。 

一 言 で 言っ て し まえ ば 「“ ”」 で 囲ま れ た 文字 の 集まり な ん で 
すっ て 。 ス トリ ング 変数 だ っ て ,。 も う 知 っ て る で し ょ う 。A$ 
と か B$ と か の マー ク は すでに た くさ ん 出 て き て いま す 。 

Cb, な ん だ か ご ちゃ ご ど ちゃ し て 来 た な ぁ , と 思う 方 も いる 
LATA 

WMA, セミ コロ ン よ コシ アマ だ け と っ て みて も 。 スト リッ デ グ 
変数 と , 通常 の 変数 で は 違う ん で す ョ 。 

o スト リン グ 変 数 

[;] は, 文字 と 文字 の 間 に 空 白 を あけ ませ ん 。 

[, |] は 10 文 字 分 の 一 定 幅 の 中 に 文字 を 書き 出し ます 。 

o 通常 変数 

[;] は , 数 値 と 数 値 の 間 に 空 白 を 1 字 分 あけ ます 。 

[, 」 は 10 文 字 分 の 一 定 幅 の 中 に 数 値 を 書き 出し ます 。 

と ん な 風 に 頭 の 中 で , 整理 し て お け ば わか りや すい で すね 。 


STRNGOSPX. CNISSTRNG 
の た し 算 で ご 、YLr eninesewe 
tREEBCSI/ 


さあ , で は いよ いよ スト リン グ の 加工 の お ぉ お 話 だ そう で す よ ノノ 
まず スト リン グ の 合成 に つい て とれ は いく つか の スト リン 
グ を スト リン グ の た し 算 を 使っ て , 新しい スト リン グ に し て し 
まう 方 法 で す 。 よ うす る に た し 算 な ん だ か ら , あま り 難 し く 考 
えな く て いい ん じゃ な いか し ら 。 


と ん な わけ で す 。 も し Yuri Shinagawa の 間 に 1 字 分 空白 
を 置き た けれ ば “ Shinagawa” と すれ ば いい ん で す よ 。 


AGB BEST CRBEPRINT IZ ST. 
Id, STRINGS 2OSRC Y Ur 
end KIKU も … 


応用 で 。 と ん な 事 も で きま す 。 


y 
Ur 
ct 


* 
ri and Kiku 


Bo bwn 
RCC. OOoOr 


ほら ね ノ ち ゃ ん と スペ ー ス が で きた で し ょ 。 ス トリ ング 変数 
も 通常 の 変数 も , 考え 方 の 上 で 大 き な 差 は あり ませ ん 。 
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READーDATA 文 は NPUT A 
BEPRINT A お で 出す の こと 同じ 
に 考え て … 


READ~ DATA X, INPUT 文 は 全く 同じ よう に 考え られ 


と と で DATA 記号 で スト リン グ を 与え る 時 は 。 ク ォ ー テ ー 
ショ ンマ ー ク が いら な いと いう 事 は 憶え て お いて くだ さい (30 
BOMBS). あと は 特に 新しい 事 は な いで し ょ 。 


NPUT a$ 

NPUT a 

NPUT b 

RINT ati Cathie 
ikin 


C DMM 


と する べき と ころ を 、 1 つの 命令 文 に する 
に は ほ は 、 こ の よう に カン マ で つなげ ば OK 


答え 方 も 同様 で 、 こ れ で も OK 
— 


MoT 053 mM" BOor-oo25- oro 
AFD coc) KM 


LEFTEAS, BJISS TFINGOO 
XzEEe4mS5BaBsCus 
コマンド 


今度 は 。 スト リン グ の 頭 (左端 ) か ら 数 えて , 何 番 目 か の 文 
字 ま で を と り 出 し て , 新しい スト リン グ が 作れ る と いう お 話 。 

と の 命令 は , LEFT$ (A$, B と いう 形 で いい ん で すっ て 。 
と れ で , A$ の 左 か ら 数 えて B 番 目 ま で を スト リン グ と する と 
いう 意味 な ん で す 。 数 え は じ め る の は ダブ ルク ォ ー テ ーション 
DKR, つま り 文 字 の 頭 か ら で す よ 。 (142) 


16 a$="Yuri Shinagawa" 
28 PRINT LEFT#¢ a; 4) 


Yuri 
k 


Q 
m 


LEFT$ レフ ト ダ ラー 
LEFT$C"ABCD",2) 
*ABCD" の 文字 列 の 左 か ら 2 TIL 


り 出し な さい 、 と いう 命令 で す 。 で す 
か ら こ れ は AB と いう こと で すね 。 Æ 
数 ど だ け じ ゃ な く 、 こ の よう (に 直接 ダブ 
ルク ォ ー テ ーション で 書き 込ん で も 0 
K で す よ 。 
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LEFTEAS B)CISEAZSTR- 
NG の 文子 数 より 多い と 、 STRING 
が まる まる 出 て 


と れ は 問題 な いわ よね ぇ 。 と こと で , ちょ っ と て 意地悪 な 事 を 考 
え ち ゃ いま し た 。 も し スト リン グ の 文字 数 より 大 き な も の を 指 
定 し ちゃ っ た ら ど うな る の か し ら …。 コン ピュ ー タ も 悩む だ ろ 
うな ある? 


180 aé="Yuri e ai 
26 b$=LEFT+Cafs, 20 
38 PRINT b$ 


Lu 

LEFT EAS BS) TBN 
いか ん を 問わ ず 、 選 < 己 ミ < ご SS を 
Zee sonis 


な る は ほど, B が スト リン グ の 文字 数 より 大 きい 数 の と き は , 
スト リン グ を その まま 出力 し て くれ る ん で すね 。 
じゃ あ B は 100 で も 1.000 で も 何で も いい の か し ら 。 

あぁ あれれ, 先生 が 首 を 横 に 振っ て いま す 。 

LEFT$ (A$, B) cii, B が 数 値 変数 , 数 値 定数 , 計算 式 
の いずれ を 問わ ず 0=B=255 を 充 さ な けれ ば いけ な いそ う で 
tk, B=0 の と き は , RUN し て も 何 も 表 示し て くれ ませ ん 。 
また , B は 計算 式 で も 良い わけ だ か ら LEFT$ (AS, A+B) と 
LEFT$ (A$, A/B) な ん て と と も , も ちろ ん 可能 。 
a$-"2468180" 
a=2 
b=1 
_PRINT LEFT ま (Ca ま ,at+b’ 

6 


Mor bwe > 
ABC OOOO 


し FT が ある の だ か ら 、 内 ロロ HT も 
IMID も あっ て か まわ な し MDE 
中 か ら 何 字 呈 すか の … 

さっ きか ら 考 えて た ん だ けど , LEFT が ある な ら , 
も あっ て いい は ず よ ね え 。 先生 に 聞い て み ま し た 。 

そう し た ら , RIGHT も ある し , MID も ある ん で すっ て 。 
MID っ て いう の は …… ? ああ そう か ノノ きっ と 途中 か ら 始 め る 
事 ね 。 英 語 の MID を 引い て みる と …… 2 "rp 
o”, "mio", "mmo" で すっ て 。 


MID$ (A$, B, © は , B 番 目 か ら C 個 の 数 を 取れ と いう 命 
令 だ そう で す 。 


RIGHT 


18 a$="ONAKÁSUITANA" 
eB PRINT MID$C as, 4,3) 
run 

KASUI 

Ol 

u 


と と ん な 具合 に , B 番 目 か ら C 個 と っ て 新しい スト リン グ を 
作っ て くれ ます 。 今度 も B。C は , OB, C<255 を 満た し て い 
れ ば いい そう で す よ 。 


10 a$="ONAKASUITANA" 
20 b=2 


38 c-4 
48 PRINT MID$a$.;2:b-c2 
run 
NAKASU 
Ok 
E 
と の よう に , B, C は 計算 式 で も な ん で も よい な どの 点 は 。, 


LEFT$ (A$, B) に 同じ で す 。 (1743) 


43 

RIGHTS ライ ト ダ ラー 
RIGHT$("ABCD", 3) 

"ABCD'Odi; 5 3 個 目 か ら 最後 
まで 取り 出し な る きい 、 と いう こと で す 
13. 

BCD 

MID$ ミッ ド ダ ラー 
MID$("ABCDE", 2,2) 

*ABCDE” の 左 か ら 2 個 目 か ら 2 
つ だ け 取 り 出 し な る さい 、 と いう こと で 


この よう に 、 文 字 を 自由 に 組立 て る 
便利 な 命令 で す よ 。 
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SPACES スペ ー ス ダラ ー 
これ は スペ ー ス つま り 空 白 の 個数 を 
指定 する 命令 で す 。 


SPACE$ (10) 


を 10 個 と いう 意味 で す 。 こ の スペ ー ス 
の 数 は 0 か ら 255 個 ま で 指定 する こと 
が で きま す 。 表 の 頭 を そろ えた りす る 
の に 便利 で すね 。 
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RIGHT SAS, S) Ice EE 
分 出す の だ け ご 、 表 示 は 左 か ら 出 て 
くる の 


今度 は RIGHT$。 も うわ か り ま すね 。 で も 早合点 は 失敗 の 
も と 。 RIGHT$ (AS, B) は , A$ の 最終 文字 か ら 左 に 数 えて 
B 文字 分 取り 出す 命令 な ん で す が , B 字 分 数 えて 表示 は ちゃ ん 
と 左 か らし て くれ ます 。 


数 える 時 は こやす 921 
18 a$=" Yuri Shi pagawa "aaremu! 222 
20 PRINT RIGHT$( af, 53 
run 
agawa 
Q 


よく awaga と な る ん じゃ な いか な ん て 考え る 人 が いま 
す が , 5 文字 数 えて か らち ゃ ん と 左 か ら 右 に 出し て くれ ます 。 
ayas IHUBOE SCA TED, 

あと は , 全部 LEFT, MID と 同じ 考え 方 。 さあ , と れ で ま 
た 3 つ 命 令 が ふえ まし た 。 


SPACESX) は PRINT 文 中 に 
スペ ー ス 周防 を X 個 文 あ お あけ て くれ 
る も の な の で きす 

と の 命令 の 応用 の よう な 形 で SPACES (X) も 覚え まし ょ う 。 
と れ は , PRINT 文中 に SPACE を X 個 分 あけ て くれ る も の な 
ん だ そろう です よ 。 (mdd) 

た と えば ,。 と こん な プロ グラ ム に な る の か な 。 
18 PRINT "Yuri": SPACE$¢(53)53 "Shinagawa" 
RUN し て みる と 
b uri Shinagawa 
a’ EL 5330343 


と な り ま し た 。 


STRINGS(S, “+ ISSTRNG 
変数 、 ある し \ は 定数 A 中 の # を 曰 人 
分 つなぐ も の 


次 に と ん な 模様 (#) を OUTPUT する た め k STRINGS (B, 
A$) な る 命令 を 使っ て みよ うと 考え まし た 。 これ は 。 Son 
う も の な ん で し ょ うか 。 (m45) 


list 
16 PRINT STRING$tT7T."H"» 


| ae 


m STRING$ スト リン グ ダ ラ ー 
lu x STRING$(3, "VUR 
E この 様 に 指定 する と 、 

y 2 YURIYURIYURI 

な る ほど 上 3 回 書き な さい 、 と いう こと な の で 


これ は スト リン グ 変 数 , ある い は 定数 A$ を B 個 分 つなぐ も Fl’ 


の らし いん で す 。 

CHC, と ん な 模様 を 作り た いん だ けれ ど , 先生 は どん な プ 
ログ ラム を 作っ た の か し ら 。 先生 は いじ わる だ か ら 教 えて くれ 
APA A A 

いい わ ノ それ な ら 自 分 で 考え る か ら …… " 


この 指定 は 、 0 か ら 255 個 まで 指定 で 
きま す 。 任意 の 文字 列 を 任意 の 数 だ け 
用 意 し な る い 、 と いう 意味 で すね 。 
R$-"HHHHHHHHHHHHHHH" 
な ん て だ くさん 書か な (て も 、 
AS$=STRING$C(15,"*$"> 
で OK な の で す 。 同 じ 文 字 を た くさ ん 
用 意 し た い 時 に 便利 で すね 。 

この STRING$ の 文字 列 は 複数 個 
の 文字 を 扱え ます が 、HuBASIC 以 外 
の BASIC で は 、 この 文字 列 は 1 文字 
に か ぎら れ て お り ま す 。 
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FR 一 NEXT を 使っ て 入出 = 
- キ ご し た ら 、 避 TRINGSI AS) 
CHADS, RA HEROIC 


E, 828, #84, と ん な 風 に ひと つ ず つ 記 号 が ふえ て る ん だ か ら , 
プロ グラ ム の 中 に は きっ と FOR て NEXT 文 が 使わ れ て いる は 
ず よ ね 。 


30, 30 番 の A$ に は 10 番 の # が 入る か ら , どう か な あ ? た 
ぶん いい と 思う ん だ けど な あ …… 


C 
= 


Botts 
HAHAHA 


や っ た ノン ほん と に FOR~NEXT っ て 便利 。 (1546) 


BEBE. BK で きま し だ 。 だ が 、 
この プロ グラ ム は 、M I D $ を 使っ た 


方 が 流れ は 良い で す な 。 


5 
21,1) 


LEN(A 吊 ) で 、A 員 の 文字 数 を 教え 
T<MNSOTS.LENAS+BS) 
も で きま す 


まだ まだ 便利 な 命令 は ある そう で す よ 。LEN (X$) は スト 
リン グ 変 数 の 構成 文字 数 を 数 えて くれ る ん で すっ て 。 と の 場合 , 
空白 も 一 字 と 数 える みた いで す 。 


180 af=" Yuri" 

20 らい ま =" Shin age awa" 
36 PRINT LEN at+b$) 
run 

13 

Ok 
E 


FOR~NEXT Cl=1 tO LENA 
中 ) と し て お し いて 、FPRINT"※ ca 
せ ば ※ が 文字 数 だ け 員 ます 


それ で は , LEN を 利用 し て , ちょ っ と お も し ろ い プロ グラ 


ム を 考え て み ま し ょ う 
10 a$-"ATSUI" 
280 PRINT a$ 
38 FOR i-1 TO LENKa ま う 
46 PRINT "3" 3— — — —— 横 に 並 ら べ る 
58 NEXT i 
さあ どん な 結果 に な る と 思い ます 。 
run 
ATSUI 
来 来 来 来 来 
Ok 
9 


i2, お も し ろ い で し ょ 。 とれ は まず 行 番号 20 で ATSUI と 
書か せ て , 30 番 で 文字 数 を 数 えさ せ , FOR~NEXT € 1 2» 5A$ 
の 文字 数 に な る まで 処理 させ て , つづ け て * を 表示 させ た ん で 
Fo (1747) 


47 
この 文字 変数 の 中 に 何 個 の 文字 が 入 

っ て いる の か な 。 そ ん な 時 に は 、 

LENCX$2 

を 使い まし ょ う 。 

X$="12345 67890" 

PRINT LENCX$> 


Ok 
E 


そう で す 。 ス ペー ス も 方 字 の ひと つ な 
の で す ょ 。 
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文字 の 左 か ら 、 右 か ら 、 真 中 か ら 、 
また 文字 は 何 個 か な 。 同 じ 文 字 を 続け 


た い 時 な ど 、 そ う 、 色 々 の 応用 が で き 
る の で す 。 
HuBASIC は 文字 の 扱い に 関し て 
は 、 最 高 の BASIC な の で す 。 こ れ か 
ら が も っ と も っ と 面白く な る の で す ぞ 。 
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STRINGER*BIC/XPN ENAT 
や \\\\ を 出し た り 、 か け 算 や た 
し 算 を 組み 合わ ば て … 


STRING$ (N, X$) は , グラ フキ ゃ 図表 を 作る 場合 に 役立つ 
まう で すず s 

と っ て も 楽し く て , た くさ ん プロ グラ ム を 作っ た の で 挙げ て 
お きま す 。 

Ap Prime string$ii18,"^7") 

A I E n mese ca 


10 ag="¥" ! 
26 print strinafc(1B,as> 


run 
ギ ギ ギ ギ ギ ギ ギ ギ ギ ギ 
k \ 印 を 10 個 つなぐ 

スト リン グ 定 数 を 使う 時 は ノ の プロ グラ ム の よう に し て , Y 
ォ ー デ ー ジ ョ ジマ ー ク [" "| で か と むか 、 壮 の よう に ヌ ネト リシン 
グ 変 数 を 使う か の 2 通り で す 。( 到 48) 

18 print string#¢6.,"#"5 


Pun 0 の 時 は 何 も 出 力 し な い 
Ok 

10 at="-" 

20 x=3 

38 print strina$ixk*2.:a$) 

run ASO"—"k 3 ※ 2 個 、 つ まり 
Ok "T 6 個 つ な げ て 出力 

10 a$-z"Tom'" Betty" [1 文字 と し て 数 える 

20 print lenta$+" Jack") 

38 print ai" Jack" 

itv A$ と スト リン グ を 足し て 
Tom Bettu Jack 構成 文字 数 を 数 える 


SEER FRE. 


Li 11T | Sh, | TO 


Te 
mt | | | LEA, 
er 二 十 

: 


Éy9 
EP / Cet 
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今日 は 秋葉 原 に 見 学 に 行っ て 来 ま し た 。 家電 品 を 買う 時 に , 
父 や 母 と 一 緒 に 行っ た 事 が ある ぐら いで , ほとん ど 知 ら な い 
ん で す が , どん な お 店 が ある ん で し ょ う ね 。 

今日 , 初め て 行っ て みた の は 九 十 九 電機 の 7 号 店 で し た 。 女 
の 子 だ け の マイ コン ショ ッ プ と 聞い て いた の で , どん な 所 な の 
か , すご どく 興味 が あっ た ん で す よ ね 。 店 内 に 入る と , 赤い ベス 
ト ・ ス ー ツ で 統一 し た 女性 達 が 。 お 客 さ ん と 一 緒 に な っ て , コ 
ンピュータ を 操作 し て いる の が 目 に つき ます 。 

女子 高校 生 の 書い た マイ コン の 本 な ん か も あっ た し , 女性 も 
結構 が ん ば っ て ます よ ノ 

で も や っ ぱり マイ コン ・ ブ ー ム な ん で すね え 。 小 中学 生か ら 
大 人 まで , 店 内 は か な り 混 み 合 っ て いま し た 。 み ん な が 興味 を 
持っ て る ん だ な あと あら た め て 実感 ノ 

秋葉 原 中 に , マイ コン shop が 続出 し て いて , お 店 の 側 で も , 
お 客 さ ん の needs に 合わ せよ うと 懸命 な の が よく わか り ま す 。 

テレ ビ ゲ ー ム が スゴ イ 人 気 で デー ムセン ター が 全盛 だ っ た 頃 
が あっ た けれ ど , 今度 は それ を 目 分 で や っ ちゃ お うと いう 事 な 
ん で し ょ う ね 。 

与え られ た ゲー ム を や っ て いく うち た , 自分 に も ゲー ム が 作 
れる ん じゃ な いか と 思う よう に な っ た の か し ら 。 と に た に かく マイ 
ュ ン 少年 が 多い の に は びっ くり 。 SH, 彼ら に 負け な いよ うに , 
勉強 を つづ け ま し ょ う 。 


ASOI コ ー ド に っ て こ て 、 10%, 5035. 
XP BE BD EIA IBAS 
せる コー に な の 

スト リン グ 処 理 関数 は , まだ まだ あり ます 。 次 に 登場 する の 
は ASC ( ス ド リ シグ ス )。 

と れ を 表示 する の に 用 いら れる の が ASCII コー ド だ そう で 
す 。 何 の と と や ら , よく わか り ま せん ね 。ASC (スト リン グ ス ) 
に よっ て , スト リン グ の 最初 の 符号 に 対す る ASCII コー ド を 
表示 する らし いん で す が , そもそも ASCII (アス キー) コー ド 
っ て 何で し ょ うか ? 

と れ は , American Standard Code For Information Inter- 
change DKT, タイ プ な どか ら 人 入力 さ れる 10 進 数 , av, ア 
ルフ ァ ベ ッ ト な ど を , コン ピュ ー タ が 理解 で きる 数 値 コ ー ド に 
変換 する も の だ そう で す 。 

コー ド 表 は , 次 の ペー ジ の 通り で す 。 

と ん な 事 ま で , すべ て 記憶 し て いて , さっ と 変換 し て くれ る 
ん で すか ら , た いし た も の だ と 思い ませ ん ? (149) 


nul 


49 
アス キー コー ド 

X 1 の キー ボー ド か ら 画 面 に 向っ て 
プロ グラ ミン グ 。 す る と 画面 に は 当然 
の ご と く 文 字 が 表 わ れ ます ね 。 で も 、 
これ ら の 文字 の 形 を を その まま お ぼ え る 
せる と だ た い へ ん な 量 の メモ リー が 必要 
に な る の で す 。 も ちろ ん 処理 速度 も 低 
下 し て し まい ます 。 そ こ で ASCI ュ 
ー ド と よ ば れる 箱 の 中 に 、 1 文字 ずつ 
の 符号 で コン ピュ ー タ に 覚え を させ て い 
る の で す 。 こ の A SCII コ ー ド は 、 は ほ 
と ん どの コン ピュ ー タ に 共通 の ユー ド 
で 、 世 界 中 で 使わ れ て お り ま す 。 

この アス キー コー ド の 集まり が 、 プ 
ログ ラム に な る の で す よ 。 

この 箱 の 番号 を 見 て み ま し ょ うか 。 
コー ド 表 の 横 の 番号 と 縦 の 番号 (0123 
456789ABCDEF) は 16 進 数 で すね 。 
アス キー コー ド は 横 か ら 先 に 読ん で 、 
例え ば A の アス キー コー ド な ら 、16 進 
数 で は 41 と な り ま す 。 こ れ を 10 進 数 に 
直す と 、 

一 0…F 10 11…19 1A…1F 20… 
29 2A…2F 30…3F 40 41 
—0--15 16 17:525 26731 32… 

41 42-47 48…63 64 65 
この よう に 65 が アス キー コー ド と な る 
ん で す 。 
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この 様 に 命 
PRINT ASec” A" JCR 
65 


Ok 


表 と 見 くら べ て くだ きい 。 A は 65 番 
に な っ て いま すね 。 こ の アス キー コー 
ド の 0 -31 番 まで は 、 コ ント ロー ルコ 
ー ド と 言っ て 皆さん が 良く 使う キャ リ 


ッ ヂ リタ ー ン (13 番 ) や 、 ベ ル ( 7 番 ) 
な ど 、 目 に 見 えな い 機 能 が 入っ て いる 
の で す 。 
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Bi2S456789ABCDEF 
B ar HEP pep 一 irem 
7 1 8hjlnSaa-|srfao 
2 2 BPhR'2BRbrac- Ir$? 
+ 3 ts#SCScs ITER 
」 4 bT$4DIGt ~ Lk Pex 
| > EuxSEUeumr-'4172*u 
ド & Fv&oFVfulg-?0n-3 
x Y e ァ キ デラ 中 日 
2 Hxc8B8HXhx| ゴ ィ ロワ ネ リ 
2 TvY)9IViu| TIn R 
A TTE F ェ エゴ ロレ ョ 秒 
B k&e:KLkt irr ED SE 
C 1>,<L%1I ャ コロ 
D Mc--zM1Im5g" 32574". 
E RNT.»M^n^"Blriatti^ 
F O¢77O_on/ 92° CR 


A&-' Yuri "CABC(A&)€P 
RINT に し て も 、 頭 文字 Y の コー ド 
== mCEBC 


人 
o (m50) 
18 pring. ascc"A") 


56 print asctb#)> 
——— OBEY AIF CHA 


run 
65 アル ファ ベッ ド A の コー ド 番 号 
66 アル ファ ベッ ト B の コー ド 番 号 
a’ 


と の プロ グラ ム で も わか る 通り 。 スト リン グ は |「 “|」 で か と 
まれ て いな けれ ば 実行 され ませ ん か ら 和 注意 し て くだ さい ね 。 


16 at="Yuri" 
ど print ascíat> 


un 
89 
k 


と の 場合 、 スト リン グ 変 数 の 中 身 の 最初 の 一 文字 し か 表示 し 
て くれ ませ ん 。89 と は Y に 対す る アス キー コー ド な ん で すね 。 


AS="YUR"NEXFNIN5% 
出し た いこ き は 、 FOR~NEXT 
で ご やれ ば し し い ワ 


Led, も うち ょ っ と 手 の と ん だ プロ グラ ム を 書い て み ま し 
ょ う 。 先生 手伝っ て くだ さい ね 。 
aj) 3 : 
1»»;ascotmrisght$cas$:i»» 

El, と れ は は ほとんど 先 生 が 書い て くれ た ん で す 。 自分 で プ 
ログ ラム を 考え る っ て いう の は な か な か 大 変 。 も っ と 勉強 し な 
さい で すっ て すみ ませ ん 先生 。 


AS="YUR”ZTASC(AS) EF 
OR-NEXTc8IZIZ. |>RI> 
UR>YURICIOSS 


ST, 実行 させ た ら ど うな る か し ら 。 


に 
3 


T TS I の コー ド 
RI a2 R の コー ド 
URI oS U り の コー ド 
YURI 23 Y の コー ド 
Ok 
D 


ちょ っ と 説明 し まし ょ う 。 行 番号 20 で は 1 か ら 始 まっ て AS 
の 文字 数 まで くり 返し ます 。 と と で は 4 で すね 。 

30 番 で 。 RIGHT$ (A$, D と ASC (RIGHT$ (A$, D) を 
表示 し ます 。 RIGHT$ (A$, D は 前 に や り ま し た よね 。 スト 
リン グ 変 数 A$ の 文字 列 の 右端 か ら 1 個 分 取れ と いう 命令 で し 
た ね 。 と と で 1 は , 20 番 に より , 1 か ら 4 ま で 変化 する と と に 
な っ て いま す 。 次 に 得 ら れ た スト リン グ を ASC の カッ コ 内 に 
An, アス キー コー ド を 与え ます 。 

40 番 は FOR~NEXT ルー プ の NEXT 文 で す 。 } が LEN 
(A$) より 大 きく な る と 次 の 行 番号 へ 移行 し ます 。 
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に ババ 
-—- 99 


と いう 命令 が あり ます 。 た と えば 、 先 
程 の A SC('A”) は 65 番 で し た ね 。 こ 
れ を 元 に も どす と 、 

Ros NT CHR#¢ 65 CR) 
Ok 
5 


S D 
ASC(X) の 逆 の 命令 に CHR$(X) 


この よう に 、 今 度 は 直接 コー ド か ら 文 
字 を 出す こと を 可能 に し た 命令 な の で 
す 。 
音 を 出し て み ま し ょ Je 

PRINT CHR4$ € 7>(CR) 


Ok 
E 


いか が で すか 。 ピ ッ / と 音 が 出 た で し 


ES PE 


100 


似 た よう な 命令 を 憶え ちゃ いま し ょ う 。 


CHRE(X) ASCER 
関数 で 、A 選 | コー ド 番 同 か ら キ 
ャ ラク タ を 選び 出す の 


ST, アス キー コー ド を 勉強 し た ん で すか ら 。, 
(151) 


Aaa 


CHR$ OO 

と の 関数 は ASC 関数 と は 逆 に X に 入る ASCH コー ド 番 号 
か ら 数 字 , アル ファ ベッ ト , カナ な どの キャ ラク タ を 選び 出す 
も の だ そう で す 。 ま あや っ て みれ ば わか る ん じゃ な いか し ら 。 
232—255 まで を 画面 に 表示 し て くれ ます 。 1313 まで は コン 
トロ ー ル コー ド と いっ て 特殊 な コー ド が 入っ て いる た め 画 面 
は 現れ て 来 な い の だ そう で す よ 。 


CHREBÜUQCABCO*BSS U 
っ / ロ ドド 員 (XX) に 数 値 を 代入 、 た し 
上 算 で 処理 で きる の 


i, 


255 を 越え る と と ん な 表示 に な り ま す 。 


Bors ons 
和 DOT 和 DT 


上 の よう に , ABC と 書く の に CHR$ を 使う と , FOES 
な 形 に な り ま す 。 と ん な コー ド を 用 いる の も , いか な る 形 か ら 
で も 出力 で きる と いう と と を 示す た めで す 。 
print asct"A"> 


Ok 
prins chr#¢65) 
Ok 


E 
ASCTCHRE を わざ ぎわ ざさ 使 う の 
は 、 コ ント ロー ルコ ー ド な ん か も 処 
BU ZL V 


と の よう に ASC と CHR$ は まっ た く 逆 の 命令 な ん で すね 。 
と いう より 裏表 の 関係 と 言っ た 方 が わか りや すい か し ら 。 
BAT, わき ぎわ ぎ と うい っ た コー ド が つく られ て いる ん で し 
ょ うか 。 か えっ て めん どう な 感じ が し ませ ん ?? 文字 に は 目 に 
見 える 文字 と 見 えな い 文 字 が ある ん だ そう で す 。 主 kK と の コー 
ド を 用 いる の は , 見 えな い 文 字 の 方 。31 番 まで を よく 使う ん だ 
そう で す 。 昔 な ら っ た 媒介 変数 の と と を 思い 出し て みて くだ さ 
Vo 例え ば , 画面 を 消し な さい と か , そう いっ た コン トロ ー ル 
コー ド の 方 が 使わ れる わけ で す 。 で も を 文字, 数 字 も 一 応 す べ て 
書き 換え られ る よう に は な っ て いる ん で すね 。 


TAB(X) タン 関数 

現在 の カー ソル 行 の 一 番 左 か ら X 個 
の スペ ー ス を 終了 位置 まで あけ る 命令 
Tha 


この 終了 位置 は 0 か ら 255 個 ま で の 指 
定 が 出来 ます 。 タ イプ ライ ター の TA 
B と 同様 に 使用 する こと が 可能 で す 。 
"HUDSON": TABC4 
SOFT 
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TA 選 謀 数 を 使う と 、 文 の 頭 の 員 だ 
し を 順 々 に ぎら し こい < く こ と も で 
きる の 


次 は 文字 を あや つる TAB 関数 で す 。 
指定 され た 文字 を 頭 か ら 指 定 さ れ た スペ ー ス を と っ て 書き 出 
す 命 令 で す 。 (152) 


print tabc¢i6)3 "Yuri" 
L—— —Q——ÓWuni  . 


Ok Yuri 10/82 
print tabiS35"Yuri" 
WR CLER ee 
"m 
ið for i-i to 10 
26 print tabci23"Yuri” 
30 next i 
nun | 
Yuri. 
Yuri. 
Yur. | 
Tur. 
Turni. 
Y か る 
Turi. 
Turi. 
Yuri 
Yuri 

Ok 
p 


TARR Cla. SSUTLIDIERR 
の 文字 を 順次 戻し て いく こと も コ 可 


La 
SEC) 
と の よう に スペ ー ス が 1 < て 10 ま で 10 個 の YURI を 出力 し て 
LE LIZ. 
と の プロ ゲタ ム 公 少し 手 を 加え て み ま し ょ う 。 
180 for i-1 to $ 
20 print tabti253"Yuri" 
30 next i 
46 for i=5 to 1 step-1 
SB print tabcids "Yuri" 
66 next i 


40 番 の STEP の 命令 覚え て ます か ? 今度 は マイ ナス が つ 
いて ます ね え ぇ え 。 た ぶん 数 字 が 1 つ ず つっ 減っ て いく ん で し ょ う ね 
as 


さぁ 実行 し ます よ 。 
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ぎれ て いく 頭 の 文字 を 己 字 ずつ に 
UTE, TABREISS PACED 
e 


今度 は 1 か ら 35 ま で の TAB を 1 っ ずっ つっ 増やし, 次 に 1 つ ず 
つ 35 か ら 減 らし て 行き ます 。 と ん な 事 も 可能 で す 。 


uh 


list 
LO FOR i-4 TO S5 STEP $ 
20 PRINT TABCi233"Yuri" 
30 NEXT i 
480 FOR 1i=3S TO 1 STEP-S 
> PRIMI TABI 2s "Yuri" 
66 NEXT i 
Ok 
a 
run 

Yuri 


と の よう に STEP を 5 に すれ ば 5 個 分 の スペ ー ス を と っ て 
次 へ 移っ て くれ ます 。 

と ん な 風 に TAB は 書き 出す 位置 を 指定 し ,。 きれ い に 見 や す 
し て くれ る ん で すね 。 


と ーー ナー ビー ビー ベー へ 


(FFF 


GOSLUS 文 は くり 返し 部 分 を ブロ 
グラ ム の 人 外 に 出し て 、 サ フル ー チ ン 
処理 に する こ 


GOSUB 文 と RETURN 文 の 登場 で す 。 こ とれ は FOR~NEXT 
の よう に ワン セッ ト に 考え て ,。 サブ ルー チン 処理 し ます 。 プロ 
グラ ム の 中 で ,。 同じ よう な も の が 何 回 も で て くる 事 が し ば し ば 
あり ます が , と の よう な 時 , くり 返す 必要 の ある も の を プロ グ 
ラム の 流れ の 外 に 出し て , 繰り 返し 利用 すれ ば と て も 便利 ノ 
と の 時 プロ グラ ム の 外 に 出し た も の を サブ ルー チン , 本 すじ 
の 流れ を メイ ン ル ー チ ン と 呼ぶ の だ そう で す 。( 呈 53) 

と の プロ グラ ム は , と て も 単純 な も の で す が , と に か く 流 れ 
を 説明 し まし ょ う 。 


list 

33 OBE 1949 327 ate 

EL a=b THEN PRINT "738 !" ELSE PRINT 
n "baa © 

48° GOTO 18 

1808 a-INTCRNDCi»X*625-41 

116 RETURN 

a 


まず 10 番 を 実行 し 20 番 の GOSUB で 100 番 に 飛び ます 。 次 
に 110 番 を 実行 し 。 RETURN で GOSUB の 次 の 行 , つま り 30 
番 へ 戻り 30, 40 を 実行 し , 40 番 で また 10 番 へ 戻る 事 に な り ま す 
ね 。 


= 


53 
SOSUB RETURN 


GOSUB は サブ ルー チン を 呼び 出 
す 命 令 で す 。 こ の GOSUB 文 は 、GO 
SUB て 呼び 出さ れ た 行か ら RETU 
RN が 書か が れ て いる 所 まで を 実行 し ま 
す 。 
RETURN て 帰っ て くる と 次 の 命 
令 を 実行 し ます 。 マ ル チ ス テー トメ ン 
ト の 時 は GO SUB の 次 の 命令 GO 
SU B で その 行 が 終っ て いる 時 は 、 次 
の 行 へ いき ます 。 

サブ プ ブルー チン の 中 か ら 他 の サブ ルー 
チン を 何 回 実行 し て も か まい ませ ん 。 
ひと っ つの RETURN 文 を 複数 の GO 
SUB 文 で 共用 し て も か まい ませ ん が 、 
サブ プルー チン の 中 か ら GOTO て 戻る 
こと は で きま せん 。 
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(754) 


54 
REM 

これ は プロ グラ ム の 中 に 注釈 を 入れ 
る た め に 使用 され る 命令 な の で す 。* こ 
こ か ら は 何 の ル ー チ ン "、“ こ れ か ら は 
TACT" UE, ジロ グラ ム 交 作る 
ECS. Fresa koi. ¿cd 
便利 な 命令 で す 。 

REM 
この R EM は 、 
て きま す 。 
プロ グラ ム の 実行 時 に は 無視 され ま 
ta, GOTORPGOSUBRTH 
岐 さ せる こと は 可能 で す 。 

REM の 人 後に | CIXUJo cft x 


続け る こと は で きま せん 。 
続け る こと は で きま せん | 


[ ASS. 
55 


温度 計 の 目盛 は 世界 共通 で は あり ま 
せん 。 日 本 を 含め た アジ ア の 国々 で は 
C セ ッ シ 、 ア メリ カ ・ ヨ ー ロ ッ パ で は 
F カシ が 一 般 的 に 利用 され て お り ま す 。 
この セッ シ と カシ の 関係 は 単純 な 計算 
で は 変換 が で きま せん 。 そ を そこ で 、F か 
ら C へ の 変換 式 
C-CF-32»*C579) 
C か ら F へ の 変換 式 
FH=(945)#C+32 

こん な 式 で 展開 され る の で す 。 さ る て こ 
の 式 を 利用 し て み ま し ょ う 。 


' て 置き 換え る こと 5 ぅ 
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摂氏 ・ 華 氏 の 温度 変換 プロ ラム で 
き 。 ロ ロコ ピー トド ビ ET1 LRTN の ワン 


セッ ト で サブ ルー チン 処理 


Wi 


list 
10 REM Xxx AH" CZF ニカ ニー メイ ラニ ルー チュ * 
58 FES: INPUT UEA SB Ne=Ff (co or f)";af$ 

a$= O" THEN € これ は 注釈 の 意味 で 見 出 
sm SOENE シト し みた いな も の で す 。 コ 
66 INPUT "オロ リマ ッ マヌ スカ “8 or n»";b$ ンピュータ は REM の 
78 IF bs="n"THEN 46 ELSE 16 入っ て いる 行 番号 を と 
30 INPUT O e a "sc ば し 、 そ の 次 の 番号 か 
98 GOSUB 2808060 ER 
166 INPUT "オロ リマ スタ Si or nl ct ら 実行 し ます 
116 IF c#="n"THEN 86 ELSE 18. 
1060 REM xXx F AD C ^ ^»h» サコ "ルー チン RK 
18018 c= f-32)%(579) . 
1025 PRINT "He "sFs "bY SP "sos "po" 
18380 RETURN y 
2000 REM XxX C カラ F ^ ^»h» サフ "ルー チン XX 
2616 £=¢€975)#c+32 
5858 PRINT "t42"sigoi"bR"zpgJ5"sRfs"pà 7" 
2030 RETURN 
Ok 
a 


Chit, セッ シ (摂氏 ) カシ GER) の 変換 プロ グラ ム で す 。 
と の よう に 必要 な 所 を 呼び 出し て くり 返す の が サブ ルー チン の 


t He (55) 


1010 
) 变换 式 

2010 

tuno カジ = ニキ Co or f)? o 
Puna E"? 29 . 

Py) 25 kb"zh» 7T h^ 

ォ オロ リマ ヌ £u or n5»? n 
Tuszf5okb"T B 

tu» O k"-h» 32 hk" 

オロ リマ ズ Cy or n)? n 

セ ョ シナ ント "7 100 

Py) 1880 ト "= カ ニュ 212 Hh" 
42U?»2h iu or n)? B 

セ 』 ョ ニーロ NY=Ff ic or +37? f 
ロナ ント 100 

hu 100 トド ニセ ョ ロー 3T.TTTTTYS M" 
ォ ロ リマ ヌカ “8 or ni? fi 

ロリ ナッ トド ? 

Ny O bY =tus 17. 777778 hk" 
オロ リマ スズ (y or n»? B 

と の よう に , さっ と セッ シ と カシ の 変換 を や っ て くれ ちゃ う 
わけ で す 。 


GOSUB-—-RETURNIS2&^7 
CORBCUTZJI—TZE*BEHBCÉ 
り 返 され る し る し な の 


list 

16 REM Xxx 747, 2"02"54 XX 

26 CLS: PRINT "55", (A+B>=1" 

38 PRINT "ヒキ キサ C(A-B>=2" 

46 PRINT カサ CAXB)=3" 

sö PRINT "ロリ サー (Aà7B»z4" 

66 INPUT A "Sk 

70 INPUT "A="3a 

86 INPUT "B="3b 

96 ON k GOSUB 1668, 20005, 3608; 4000 
1 ロロ PRINT "39I="*x 

118 INPUT モウ カイ チト "ケイ サエ BF n "ias 
126 IF a#="n"THEN EO ELS E 98T9 18 
1060 REM ## 527". サフ "ルー チュ zT 

1818 x ニョ +b 

1 & RETURN 

2000 REM xx EFT“? サコ" ルー チ ニ RE 

2010 x=a-b 

2020 RETURN 

3000 REM xx カカ サマ ニー サフ "ルー チン XX 

3818 x=axkb 

3020 RETURN 

オロ ロロ REM xx ロリ サマ サコ" ルー チン XX 

40156 x=a/rb 

4626 RETURN 

Ok 

% 

と れ を RUN させ る と , 

399*5 CB*B2-71 

上 キサ すゞ っ CA-Bd=2 

Aye] (AXB)=3 

ロリ すさ CAB) =4 

トコ サイ サッ の 2 

A=? 1666 

B=? 189 

コッ エー 998 

モロ イキ トイ サー 3220 (y or n)? B 


さあ GOSUB~RETURN 理解 し て も ら え た か ナ ? いか が 
で すか ? メイ ン ル ー チ ン の 中 GOSUB 文 が 現われ る と , 
その 文 の あと に くる 行 番号 の サブ ルー チン に 飛び込み, また 飛 

込ん だ サブ ルー チン KK RETURN 文 が 現われ る と , メイ ン ル 
ー チ ン の , サブ ルー チン に 飛ん だ と き の 次 の 行 番号 に 復帰 し ま 
Fo (156) 

FOR~NEXT と の 使い 方 の 上 で の 大 き な 差 は ルー プ が クロ 
ス し て も か まわ な いし , ど と か ら で も 飛び 込め る と いう 事 。 と 
れ で プロ グラ ム を くり 返す の も 何 の 苦労 も な く な り ま し た ヨ 


も うう 一 つの 応用 と し て 、 四 則 演 算 の 
プロ グラ ム を 作っ て み ま し ょ う 。 こ れ 


は 4 つの サブ ルー チン を 用 意 し まし た 。 

この プロ グラ ム は 、 特 に サ プ ル ー チ 
ン に する 必要 は な い の で す が 、 勉 強 の 
た め に わざ と 複雑 に し た の で す よ 。 
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57 
LOCATE は 、 画 面 の 位置 を 指定 す 
る 命令 で す 。 


40 文 字 モ ー ド で は 、 
LOCATED, B? 
か ら 

LOCATEC(39. 24) 
80 廊 字 モ ー ド で は 、 


LOCRHTEcCGO; 8» 
か ら 


LOCATEC 79, 24) 
の 範囲 で 使用 し て くだ さい 。 


IN ERE LI m 
途中 で 止め ゆる 時 に は 、 


[SHIFT] t [BREAK] 
の キー を 同時 に 押し ます 。 


ETS 
3 で も 同じ で す 
よ 。( コ ント ロー ル C) 
この コン トロ ー ル キー 
は 、 い みろ いろ な 機能 が 多く 隠さ る れ て お 
り ま す 。 
[E_252 ] の ユン トロ ー ル ュー ド 表 を 
参考 に し て くだ きい 。 


JL: 


r- 
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LOCATE DT. PARO. y) 

の よう な 座標 位置 を 指定 する た め 

DETIN 

180 cls 

ge lepate 1822 
e 


46 goto 2 
run 


5 


Y 62:23:01 

LOCATE と いう 命令 は 画面 上 で 出力 し は じ め る 位置 を 指定 
する も の で す 。LOCATE 10, 5 の 最初 の 10 は x 軸 , 次 の 5 は 
y 軸 の 値 な ん で すっ て 。 だ ん だ ん 細か い 命令 に な っ て きま し た 
けど 大 丈夫 で し ょ ? と の 時 計 は 正確 に 時 刻 を 表示 し て くれ ます 
けど , これ を 止め る の は 


[SHIFT] +[BREAK] key 02 (57,58) 


Break in 38 


EB AITULZICZESSe 
S TREDJYERESC, 数 値 の 合成 
Sees / 


STR$ (X) は , 数 値 を スト リン グ (文字 列 ) に 変換 する 関 
数 で す 。 何 の た め に と ん な 事 す る 必要 が ある ん だ ろう と 疑問 に 
思う で し ょ ? (m59) 
STR$ (X) を 使う 事 に よっ て 数 値 の 合成 が 簡単 に で きる よ 
うに な る ん で すっ て 。 そう 言わ れ て も あま り ピ ン と と な いな あ 。 
「 先 生 ノ 何 か プ ログ ラム を 作っ て くだ さい ] 
16 print str#¢(123) 
Mm RO 


run 
1 つづ ) スト リン グ ス 123 "ES 
Ok 


最初 の 1 ご ヨ こ と ST 選出 で 実行 され 
た ] 己 紀 は 別 の 性 質 、 実 行 さ れ て 中 
て きた の は 文字 だ か ら … 


と れ も プ ログ ゲラ ム な ん だ そう で す よ 。10 番 の 123 と 実行 され 
1212314, まっ た く 別 の 性 質 だ と いう 事 が わか っ て も ら え る か 


180 a=10 
20 b-18 
38 print str+(akb> 
run 

188 
Ok A と B を か け て 、 そ の 数 を STRS 関 数 に 
AM よっ て スト リン グ と し て 扱っ た も の 


な た です ks 


10 EM 
38 ht=str+cakb) 
46H print hf AXB を STR$ に よっ て スト リン グ と し 、 
run スト リン グ 変 数 に 代入 し て 表示 
68 
Ok 
E 
18 print str$i280»5 
20 print str まで て 
36 print str$ciie-r-18»5 
run 
eu 
e 
1E+16 
Ok 
E 


bh? と の プロ グラ ム の 30 番 は 何で し ょ う ? 

STR$ は 理解 し た けれ ど , 1E の EE っ て 何 な の か し ら 。 それ 
に 実行 され て 出 て 来 た も の は 違っ て いる し …… 先生 ， わか り ま 
HAS 先生 っ た ら 「 や っ て な か っ た っ け …… | @F at, Y 
5b, と れ は 指数 の 問題 の よう な ん で す が , 教え て も らい まし 


k 9 BS 


STR$ は 、STRING$ と まち が うと 
いけ な い の で 、 エ ステ ィ ア ー ル ダラ ー 
と 呼び まし ょ う 。 

STRECK) 

この X は 数 式 、 及 び 数 値 の み 入 れる 

こと が で きま す 。 を その 数 式 や 数 値 を 、 


娘 字 列 に し な さい と いう 命令 な の で す 。 
A$=STR$(1000> 


INT A$ 
[999 


この よう に 、 数 字 を 文字 列 に し て し ま 
いま し た 。 
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c d Ps 


ー ビ + 選 は 対数 こ 同 じ よ う ラ ネ / 有効 
数字 が 尾 桁 以内 だ か ら 指 数 範囲 が 
BOSE 
数 値 定数 と し て は , 符号 , MF, 小数 点 か あら な る 10 進 数 と , 
符号 , 仮数 部 , 指数 部 か ら な る 10 進 数 が ある ん だ そう で す 。 
前 者 の 例 を あげ る と +10, -20, 0.05, -0.0009 な ど で す 。 
さっ き 何 だ か わか ら な か っ た EE が 登場 する の は , 後者 の 方 で 
Ty 
と の 表示 方 法 は , 指数 表示 と いわ れ , ある 値 ,。 た と えば 100 
が 10 の 何 乗 で ある か を , 一 目 で わか る よう に 表わし た も の な ん 
EBSCO, 
100 (41027307, 指数 表示 を 使っ て 表わす と 1E+2 と な る 
ん で すっ て 。 
例 10E-8 (0.0000001) 
仮数 部 指数 部 
2E+3 (-2000) 
2.5E*0 (= 2.5) 
2.5E+1 (= 25) 


対数 こ 同 じ よ うだ か ら 、 宇 宙 の 大 
き さ を 表わす 天文 学 的 な 数 も 簡 洗 
に 表示 で きる の 


つま り 指 数 部 と は xB の あと に つい て いる 数 値 で プラ ス な ら 
ば 0 が ふえ る わけ だ し , マイ ナス な ら 小 数 点 以 下 ど ん どん 小さ 
く な る わけ で す 。 

対数 と 同じ 考え 方 よね 。 対数 な ん て 大 嫌い だ けど , 少し は 助 
け に な っ て くれ る 事 も ある の ね 。 と と で 気 を つけ る 事 は , 表現 
で きる 数 値 デ ー タ に 限り が ある と いう 事 。 有効 数 字 は 8 けた 以 
A, 指数 範囲 が 10?7 か ら 10 や まで で すっ て 。 い いか し ら ? 

それ か ら も う 1 つ 。 コ ンピュータ は 原則 と し て 仮数 を O. 
xy2zE と いう 風 に 小数 点 以 下 1 位 か ら 始 め る ん だ そう で す 。 だ 
か ら さ っ き の プ ログ ラム の 1 E+10 を 実行 し た 場合 , 〇 . 1 E+11 
と 表示 する コン ピュ ー タ も 当然 ある わけ 。 (#60) 

コン ピュ ー タ に は , て と の 方 が オー ソ ド ッ クス な 形 な ん だ か ら 
ね 。 い ろ い ろ な 値 を E を 使っ て 指数 表示 し て み ま し ょ うか ? 

ちょ っ と ば か ば か し いけ れ ど , 新聞 紙 を 半分 に 切っ て 重ね て , 
それ を 半分 に 切っ て 重ね , と いう 風 に 40 回 繰り 返し て 重ね る と , 
その 厚 さ は ? .165E+12mm で すっ て 。 と ん な の は ?⑦ AW 
の 心臓 が 70 年 間 に 送 り 出 す 血 液 の 量 .184E+9 4 

他 に は , 


銀河 宇宙 の 直径 ・95E+18 km 
Y の 総量 -4E+42 kg 
Ke ET 


E は Exponential (指数 ) と 言う 意 
味 の 文字 で す 。 

小数 点 の 位置 が 何 個 ず れる か と いう 
こと で 、3.001E 5 と は 、3.001 X105 で 、 


実は 300100 の こと な の で す 。 
1 E 2 =100 

1 E 3 =1000 

1 E 4 =10000 

1 E 5 =100000 
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AS="10' 
B$= で / 
VALCAS +B$) 


VALA oT. STREN CHIC 
STRING 変数 や 定数 の 内 容 を 数 値 
に 変え る も の な の 

ASC(X $), CHR $(X),STR $(X) と 出 て 来 た と と ろ で VAL 
関数 も 見 て お きま し ょ う 。 

VAL 関数 と は STR$ (X) と は まっ た く 逆 の 関数 で スト リ 
ング 変数 また は スト リン グ 定 数 の 内 容 を 数 値 に か える も の らし い 
ATT. 実際 に プロ グラ ム を 見 て いっ た 方 が 早 そ う ね 。 

16 ag="162" 

20 ヨ ニ リョ 1 ョ キ ) 

38 print a$5.a 
ri 

haa 162 


出力 結果 を 見 る と 差 が な いよ うに 見 えま す が , 左 は スト リン 
7, 右 は 数 値 と し て と り 扱 われ て いま す 。 わ か る か な あ ?⑦ で 


のり 1 し プロ ダラ ム ま 書き まし ょ う 。 


と と で 出力 され た 1234 は 数 値 で あっ て , けっ し て スト リン 
グ ス で は あり ませ ん 。 


ヨコ TRSEBCO の 変数 ご うし を た し て 、 
VAL で 数 値 に 変換 し て や れ ば 、 数 
字 の 合成 が で きる の 


で は 今度 は , 数 値 ど うし を 合成 し て 新しい 数 値 を 作っ て み ま 


Lido その た め に 必要 な 操作 は と いう と …… 例 と し て 12 と 34 


を 使っ て 1234 と いう 新しい 数 値 を 作り まし ょ う 。 (m61) 


SEC ODO 
[了 
0 o 
上 vr 
| 
fu 
cre ct ct 


Mo 5-mosogmne 


行 番号 10, 20 
ヶ |. 30,40 


数 値 を それ ぞ れ の 数 値 変数 に 代入 
数 値 を スト リン グ 人 変換 し て , それ ぞ れ の スト 
リン グ 変 数 に 代入 


の 50 スト リン グ 変 数 の た し 算 

" 60 スト リン グ 変 数 を 数 値 に 変換 し て 数 値 変数 に 代 
入 

70 数 値 変数 C の 内 容 を 出力 


どう で すか , と の プロ グラ ム に は , STR$(X) と VAL(X$) 
の 両方 が 使わ れ て いま す 。 理解 し て さえ いれ ば , 難し く な い プ 
ログ ラム の は ず な ん だ けど , どう か ナ ? 


バリ ュー は STR$ の 逆 の 関数 で す 。 
PRANT STR#(16) 


dl vaLc"1a") 


O TO 
amm 


を 数 字 に 置き 換え る の で す 。 
="423" 


m 
3 


TODOD 


$ 
k 
k 
R 
1 
k 


ほら 、 こ の 様 に 数 字 変 数 に 取り 込ま れ 
た で し ょ う 。 それで は いろ いろ 試し て 
「 みて くだ さい ね 。 
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ココ RSC の た し 算 は な ら べ て 書 
く こ と し うつ 意味 だ か ら 、 か け 算 に 変え 
て も だ め な の で きす 


と と で , 50 番 の を * に し て みた ら ど うか し ら な ん て 考え て 
いた ん だ けど , どう 思う 。 


n 
pe mismatch in 58 


MO-5 -1no-d.coroc 
AW C COCOCOCOCOCUCU 
O 
+ 
| 
üu 


や っ ぱり * じ ゃ だ め な ん で すね 。 考え て みれ ば 当然 の 結果 か 
な o だ っ て , 50 番 の 段階 で は スト リン グ 変 数 だ か ら , た し 
RU, と いう より は な ら べ て 書く だ けし か で き な い わけ よね 。 

+ の 記号 は 使っ て いて も , 文字 と 文字 を た すこ と と な ん て で き 
る は ず な いか ら , と この 場合 は , な ら べ て 書き な さい と いう 記号 
と で も 理解 し た 方 が いい で し ょ う 。 か け 算 し な さい な ん て , E 
理 な 注文 と いう も の 。60 番 の VAL で は じ め て 数 値 と な る ん で 
す も の 。 です から VAL (X$) で X$ の 内 容 は , スト リン グ 
定数 ,、 スト リン グ 変 数 及び スト リン グ の た し 算 の どれ か に な る 
わり で ず 。 
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ジタル 時 計 を 出し まし よう / 現在 
時 刻 の 指定 も 必要 

基本 的 命令 は ,。 も うか な り 出 て きま し た ネ 。 皆さん も , そろ 
ZA, 大きな プロ グラ ム の 1 つ で も と 思っ て る ん じゃ な いか し 
bo 

そ と で , 先生 と 一 緒 に , 時 計 で も 作っ て みよ うと いう 事 に な 
り ま し た 。 画面 上 に 1 秒 ご と に 数 字 の か わる デジ タル 時 計 が 出 
て くる ん で す よ , Chri UL. CHAMeBH, と に か く , 
あき ら め ず に 作り あげ た プロ グラ ム を 見 て くだ さい 。 あ っ 
その 前 に , 必ず 時 間 を 指定 し て , 
時 刻 を 合わ せ て お いて くだ さい ね 。 た だ TIME$-'16:38:00"2 
いう 風 に 入力 する だ け 。 必ず 6 けた の 数 字 で ね 。 (62) 
入力 し た 時 は 4 時 38 分 0 秒 だ っ た ん で すね 。 も し と れ を 忘れ 
BE, コン ピュ ー タ の 電源 を 人 和信 れ て か ら の 時 間 が 表示 され ちゃ 
うん で す よ 。 どう ぞ ど 注意 ノ 


コン ピュ ー タ ー の タイ マー と 


画面 いっ ぱい に 出る 時 間 表 示 の 数 字 は GRAPH キー を 使っ て 
打ち 込み まし ょ う 。 


回 + 回 =。 


62 


タイ マー の 設定 
X 1 に は 年 月 日 、 時 分 秒 を 記憶 表示 
する こと が で きる 機能 が あり ます 。 一 
度 設 定 す る こと に より 、 内 蔵 充電 式 電 
池 が ある か ぎり 動作 し て お り ま す よ 。 
DATES$="82/11/15" 
日 付 の 設定 
か な ら ず ノン で 区 切り ます 。 
TIME$="416: 38: 49" 
時 間 の 設定 


か な ら ず : て 区 切り ます 。 
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F 


m 
: 


:PRINT 


HL 


と の 場合 は 2 次 元 又 下 
i-1 TO TIREAD 三 下 《ji 


囲 を 指定 し ます 。 


38:00" 
TO 19:LOCATE B.1:PRINI 


SES BASSAS SE 


o 


B TO 9: FOR 


不 


i-2 TO 19:LOCATE 38;i 


CATE 0,25: PRINT 


d o _ 一 J i 


= 
ime$-"16 


ti 
Ok 
a 


で 変化 する と いう 考え 方 が 基本 に 


な っ て し る の 
配列 変数 で 変数 の 範 


リン ダグ 配列 で す 


B 


(m ビュ と て レア ペン ペン 


eal il i i ii 
SCA 
ee ee 
mH Cas 


*LOCATE 19,8: PRI 
T s$(s1>,i>:LOCATE 


Za 


NT st を tmi, i)i LOCATE 


"$" 
p 
> 
- 
$ 
- 
T 


L 
n 
i 
h 
m 
m 
三 
三 
NT s$6hi1:i»5:LOCRTE 1 


ALELLA UL ne OH 
COS While en E+ 
Lene EEE ACT d ii 
ss [トー 
I-II ACH SI sr 
xd nthe MO) MZ 
Otel i WEAR © 
(0 し L ロ ロロ ロロ ウロ コテ ZK A 
Lube I LIZ de. e 
We JE EEE AHHH (be +. ES IS MR MI II E EAE LAE TEE E A 
ECU!" TAETOT-9 ビビ ビビ ビビ ビビ ビビ ーー ビビ ーーー ビービー ビー ビー トー 
TO t Mf Mr IA MONTO e A TETTE SESSEL AE EAEAEAE AERE EAE EAE 
の = QOO Hd d doo a O OHIO AAAAAAAAAAAAAAAAAAAAA 
人 
si ) (ox SAIN Til AAI Tl AAI TL 
eoCuO VADO GO GO 
nabla C4. COCOCOCOCOCOCOCOCOCOCOCOCOCOCO CO CO CO COCOCO 
ZN A A AN NN A NCNMMMMNMN 


ATE 19,4:PRINT 


116 


と うな っ ちゃ いま す 。 


e 
と の プロ グラ ム を 行う ど と と 説 明 す る と , 


て と て て て て て て て て て て て て エエ エエ て て て て エエ エエ て 
ビビ ビビ ビビ ビビ ビー ビー ビー デー ビビ ビー ビビ ビー ビー ビビ ビービー ビー ビビ ビビ ビビ ビビ ビービー ビービー ビー ビー レビー トー トー 
po Ia II IM AE EAE EAE AE EAE EAE EAE AE E EET EAE EAE E E EE AE E EAE XE E LAE EAE XL E LEAL SE DAD 
ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ ロロ 


ANOTADAS AO SE SD E- OUO SE UOS DE- AIO LO AIO UO SDE- AIO SE LOS Ol AC LO 
COCOCOCUOCOCUCOCUCOCOCOCO CO COCOCOCO CO CO CO CO CO CO COCO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO C 
COGOCOCOCUCOC)COCOCOCO COCOCOCOCOCOCUCOCO COCOCUCOCUCOCOCO CO CO CO CO CO CO CO CO CO CO CO CO CO CO CO TOP CT os 
OA 0000000000 0000 IO NO 


元 


と の 場合 は 2 次 


10… 配 列 変数 で 変数 の 範囲 を 指定 し ます 。 


スト リン グ 配 列 で す 。 
… 一 度 画面 を 消し まし ょ うと いう 命令 で し た ね 。 


20・ 


I が 1 か ら 7 ま で の 間 で 次 々 に 作ら 
I) を 読み 取る の で す 。 


30…J が 0 か ら 9 ま で , 


れる 。 (J, 


I) の 座標 上 に | を 書く と と 


I が 2 か ら 19 ま で は (0, 


を くり 返す ワケ で す 。 


50… 


(0, 20) の 場所 か ら —— を 書き 始め ます 。 
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80… (19, 4) «€, (19, 8) に 金 を それ ぞ れ 書き ます 。 

90… (3, 15) か ら DIGITAL CLOCK を 書き 出し ます 。 

100… や は り (3, 17) の 点 か ら Yuri Shinagawa を 横 に X 
示し て いっ て くれ ます 。 

110… と れ は 何かと いう と , OO : 〇 OO : 〇 〇 と いう 表示 。 つ 
まり TIMB$ の 1 番 左 は し の 1 文字 を と り , それ を 数 値 
と し て 表示 せよ と いう 意味 で す 。 

120… 110 番 と 同様 に 今度 は MID を 使っ て , TIMES OH, 
つま り 左 か ら 2 文 字 目 か ら 1 文字 分 を 数 値 に 変え て 表示 
LUN, 

160… 今 度 は 右 は し か ら 1 文 字 分 で すね 。 

170… I の 範囲 を 指定 し ます 。 

180… 左 か ら 2 文 字 目 まで , つま り 〇 〇 時 の 部 分 の 場所 を 指定 
し て 表示 させ ます 。 

190… 同 様 に O 〇 分 の 部 分 を 定め ます 。 

200… 同 様 に O 〇 秒 の 部 分 で す 。 

210… 170 行 の FOR を 受け ます 。 

220… 時 計 で すか ら 数 値 は ドン ドン 変わ り ま すね 。 110 行 に も 
どり , 何 回 も 同じ と と を くり 返す わけ で す 。 

1000…1000 番 以下 は 表示 され る 数 字 の 実際 の 形 の デー タ で す 。 
と と か ら 始 め な けれ ば な ら な い の が , めん どう と いえ ば 
wwe ow é 6 Sy 


最後 に プロ グラ ミン グ を スッ キリ 
と 整え て 、My 口 ロ ロ K の 完成 で す 
ek 


さて 。 と ん な か わい い 時 計 が で きち ゃ いま し た 。 う れ し い な 
BL で も 喜ん で ば か り は いら れ な い の で す 。 と の プロ グラ ム , 
も っ と 省略 で きる 部 分 は な いか し ら ? どう で し ょ うか 先生 ? 
えっ ? そ う で すか 。 どうやら 110 番 -160 番 は も う 少 し きれ い 
な 形 に な る みた いで す よ 。 
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110 hif$-left$itime$;15:hi-ualíhi1$» 


よく 見 る と 


そう ね え 。 


が 2 つも 使っ て あっ て , ちょ っ と ま 


わり くど い 書 き 方 で すね え 。 


Les 


all uU uU! a uh デ 


uu 
Od OO 


- CCEEWWM 


そこ で 


COCOCOCOCOC) 
“On 二 im 
ーー ゴー 


と れ で いい わけ で すね 。 


と 書き 直し て み ま し た 。 


プ に と っ て お か な くち ゃ 


絶対 テー 


や っ と で きた 私 の 傑作 


ね ノ 


g Digital clock. 


save" Digital clock" 


ritin 
Ok 
de 


DIGITAL CLOCK 


ni 
3 
m 
gi 
m 
c 
Ru 
0 
eA 
て 
3 
> 
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コン ピュ ー タ の 話 と は まっ た く 関 係 な いん で すけ ど , ちょ っ 
と 目 に つい た 記事 が ある ん で す よ ね 。 

「 男 性 と 女性 で は 脳 の 使い 方 が 違う | と ん な タイ トル が つい 
て た ん だ けど , 本 当 な の か し ら ? どう 思い ます ? 

男性 と 女性 が いろ いろ な 面 で 違う と いう の は , 当然 の 事 で す 
GE, 科学 者 の 中 に は 体 の 大 き さ と か , 体力 と か いう 生理 的 な 面 
以前 に , も っ と 基本 的 な 相違 が ある と 考え る 人 も いる そう で す 。 
どう や ら , 男 と 女 で は , 外界 の 事象 を 経験 する 仕方 に し て も 
違う らし いん で す 。 男女 は それ ぞ れ 触覚 も 聴覚 も 異な り , 何 か 
問題 を 解く と き で も , 異な っ た 脳 細胞 を 働か せ て いる よう で す 。 
で も , そう 言わ れ て みれ ば , 女の子 っ て 一 般 的 に 数 学 と か 弱 
いし , その か わり 語学 は けっ と う 強 か っ た りす る で し ょ ? 
男性 の 脳 の 組織 的 特徴 は , 視覚 に よる 空間 認知 能力 が 優れ て 
いる 事 な ん で すっ て 。 数 学 に 強い の も うな づけ ます ね え 。 
それ に , 女性 の 脳 の 方 が 言葉 を 扱う の に 適し て いる 事 も , あ 
る 程度 明らか に され て いる よう で す 。 

本 当 に 男 の 人 と 女 の 人 と で は , 脳 の 使い 方 が 違う の か し ら … 
…? 長い 問 の 慣習 に より そう な っ た ん じゃ な い の か し ら ? 
後天 的 な も の だ と 考え て る 学者 も あず いな ん いる よう だ し 
先天 的 な も の だ な ん て いわ れ た ら , どう し よう も な いも の ね 
え 。 せ っ か く コ ンピュータ を や っ て みよ うか な ぁ ー な ん て 考え 
る 女の子 が 増え て き て いる の に , 生ま れつ き 男 の 子 よ り も 数 字 
に 弱い ん だ , な ん て 言わ れ た ら シ ョ ッ ク よ ね ぇ 。(P236 に 続く ) 


NGS(X) COS CX) 
SN TANG 


も うす で に INT (イン テ ジ ャ ー) と か , RND (5 ンダ ム ) 
な どの 数 値 関数 は 出 て き て いま す が , と と で まとめ て と りあ ぁ あげ 
て お きま し ょ う 。 関数 と いう と , どう し て も 三角 関数 の イメ ー 
ジ が ある ん だ けど , ST, どん な 関数 が 出 て くる で し ょ うか ? 


ABSX) は 絶対 値 の 計算 関数 、( ) 
内 に は 数 値 変 数 、 数 値 定数 、 計 算式 
が 入り ます 


ABS (X) (アブ ソリ ュー ト ) は 絶対 値 の 計算 を し て くれ る 
関数 で す 。ABS と いう の は absolute value の 略 だ そう で …… 


PRANI ABS (-6) (163) 


Ok 
m 


Pee aT ABS(6) 


Ok 
m 


63 
関数 a function | PRINT ABS — a =) 


関数 と は 何で し ょ うか 。 を そう で すね 、 
- 般 的 に 使わ れ て いる の が 三角 関数 と Ok 
いう 言葉 で す が 、 そ れ だ け で は あり ま 
せん 。 数字 の 数 が の 数 の 


変化 に し た が っ て 変化 する と き 、 | ほか | = -— 
E ds mu] O の 中 に は 数 値 変数 数値 定 数 , 計 算式 が 入り ます 。 ス ト 


と 言う の て す 。 リン グ は ダメ で すか ら 気 を つけ て ! 

で すか ら 、 色 々 な 数 の 変化 、 文 字 の 
変化 を 行う こと が で きる 命令 を 、 こ こ 
で は 関数 と 言っ て な おり ま す 。 関 数 の 数 
々 を 、 ゆ り ち ゃ ん の ノー ト て 覚え て 
だ きい 。 
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—REBSEGSINCK), COSO), TA 
N(CX) は ( ) 内 の 度数 を ラジ アン 単 
位 に 変換 し て 使い ます 


さて , 次 は 三角 関数 で す 。 SIN (サイ ン ), COS (コサイン ), 
TAN (タン ジェ ント ) は , 皆さん 知っ て ます よね 。 SIN (X), 
COS (X), TAN (X) OX に は , 定数 や 計算 式 が 入り ます け 
NE, 気 を つけ な く て は な ら な い 事 が ある ん で す 。 

数 I の 教科 書 に も 書い て あっ た けど , 度数 表示 の 問題 で す 。 
X は 常に ラジ アン で 表 さ な けれ ば な ら な いん で す ! 

度 を ラジ アン に か える 変換 式 を 書い て お きま し ょ う 。 

X( ラ ジア ァ ン ) テム A( 度 ) 米 pan( 1 )/180 

pa1( 1 ) は 3. 14…… の と と 。 pa ( 2 ) は 6. 28…… , pa1( 3 ) 
(29, 42------ DET. BOMBA F ? 

さて , 45 度 の SIN を 求め て み ま す よ 。 まず 45 度 を ラジ アン に 
変換 し ます 。 


435#PAIC1)7186 

INT 4 

78539816 

ラジ アン が 求 ま り まし た 。 さ あ SIN を 出し ます よ 。 


T SIN. 78539816) 
716678 


せっ か く ラ ジア ン を 求め て ある の で すか ら , COS, TAN も 
求め ちゃ いま し ょ う ね 。 


PRINT COS(+. 78539816) 
gp ABRE 


えー と 。sin 45 は ニー で , cos 45° b rob b, 同じ 結果 
で いい の よね 。 à 
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» 78539816) 


フー ン ! な る は ほど 。 TANS は 1 と 考え ます けど , 本 当 は 
限り な < く 1 に 近づく の だ か ら , と これ が 正しい ん で し ょ う ね 。 


ATNCX) は TANX) を 思 に し た も 
の だ か ら 、ATNCO= TAN (X) 
に な る の 

も う ひ と つ , ATN (X) (アー クタ ンジ ェ ン ト ) も る 勉強 し ま 
> & De 

ATN(X) 2 TAN-! (X) 

TAN 45 度 は 1 で すけ ど , TAN” を 使え ば 1 か ら 45 度 が 算出 
で きき DATT Ex 

ATN の 結果 は , ラジ アァ ン で 出 て きま すか ら , 今度 は ラジ ァ 
ン か ら 度 に 変換 する 事 が 必要 と な っ て きま す 。 


PRINT_ATNC1> 
. 718539816 

Ok 

E 


A( 度 ) = メ ( ラ ジ ァ ン ) 米 180/pai( 1 ) 
さて , 度 に 直す の に は …… 
PER 78539816*1880/PAI€C1» 


Ok 
m 


と れ で OK ! 
次 は X の 値 を 倍 精度 に 変換 する CDBL (X) (コン バー ト ダ 
ブル ) 命令 で す 。 


な る 程 ね 。 倍 精度 で すか ら 16 け た まで 表示 し て くれ る の ネ 。 
さら に CSNG (X) (コン バー トシ ング ル ) は , CDBL と は 
逆 に X の 値 を 単 精度 に 変換 し ます 。 


PRINT CSNGC1-.15»5 
«15 


CSNGC1.156784321695421» 
7843 


8 けた ( 単 精度 ) より も 多い けた 数 な ら ば , と の よう に た, 8 
けた まで 表示 し て くれ ます 。 


し ロロ (X) は X の 自然 対数 を 号 え る 
コマ ンド 、 逆 に EX は 自然 対数 
DECLARARE- 


LOG (X) à, X の 自然 対数 を 与え る 命令 で す 。 


PRINT LOG¢2) 
・ 69314718 


e 


ion call 


bn? LOG を 使う 時 に 注意 する 事 は , X の 値 な ん で す 。 
常に X メ は ゼロ より 大 きく な けれ ば な り ま せん 。 

EXP (X) は イク スポ ー ネ ン シャ ル LoT, log と ほぼ 逆 の 
よう な も の 。 自然 対数 の 底 と の X 乗 を 関数 の 値 と し て 持ち ます 。 
PRINT EXPC(-6932314718)> 
ok 
m 


ioi! log (2) と 比べ て どら ん な さい 。 
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SGNOQISX2O.X-O0X«QOc 
それ ぞ れ 1 ウー] の 符 写 を 写 え る コ 
マン に な の 
SGN (X) は , X に 符号 を 与え る 命令 で す 。 
A0 =] 
A= =) 
XLO ——1 
X は 1, 0, 一 1 の 3 つの どれ か に た 必ず 分 けら れ て し まい ま 
す 。 
PRINT SGNC9) 
1 
Ok 
RINT SGN¢@) 


P 
e 
Ok 
PRINT SGN- 4) 
Ok 
$e 


わか り ま す よ ね 。 

SOR (X) (スク ウェ アル ー ト ) は , X の 平方 根 (SX) を 
求め る 命令 で す 。 ス クウ ェ ア ル ー ト と いう 名 前 か ら も , どん な 
命令 か 推測 で きま す ネ ! 


PRINT SGR(4) 


平方 根 な ん て 何 年 ぶり か な あぁ あぁ 。 文科 系 だ と ホン ト に 接する 機 
会 が な いも の だ か ら , すぐ 忘れ ちゃ う の よ ネ 。 で も を 忘れ て も 大 
丈夫 コン ピュ ー タ に お まかせ で す 。 


SUM(X) |e. 1] か ら X ま で の 和 を 
宮 計 し て し まう 義人 琉 な の 、 便 利 で き 
= 


SUM (X) (サム ) は , 1 か ら X ま で の 和 を , パッ と 出し て 
くれ る 便利 な 命令 で す 。 1+2+3+ な ん て , も う や ら な く 
て いい ん で す ョ 


PRINT SUM18» 


さら 

Ok 

PRINT SUM‘(166> 
P moin 

PRINT SUMi10880) 
ご ロロ ロロ 

Ok 

E 


FIX (X) (249 PA) v ST, これ は X の 整数 部 の み を 
と り 出 し , 小数 点 以 下 を 切り 捨て る 命令 で す 。 四 捨 五 人 は 行 な 
いま せん か ら 注 意 し て ネ 。 

PRENIE FIX 3. 65798) 
Ok 
E 


と ん な ふう に な る ん だ けれ ど , と の 命令 と よく 似 た も の を , 
ど と か で や っ た よう な 気 が だ し ませ ん ? と と で 是非 思い 出し て 
欲し い の が FRAC (X), フラ クシ ョ ン で す 。 FIX (X) が 整数 
値 だ け を と り 出 し , 小数 点 以下 を 切り 捨て て し まう の に 対し , 
FRAC (X) i£, 小数 点 以 下 の み を と り 出 す 命 令 で し た ね 。 


PRINT FRAC(CS. 65785 
: 6578 


m 
含ま で 出 て 来 た 関 数 の 中 で , と の よう に 裏表 の よう な 関係 の 
Pair 33, けっ と う あ り ま し た よね 。 と うい う も の は , 一 緒 に 
覚え て し まう と , 理解 は 速い し , また 深く も な り ま す 。 
関数 を 上 手 に 使っ て , プロ グラ ム を 楽し み ま し ょ う 。 


127 


AEC, 随所 に 出 て 来 た IFSTHEN 文 な ど は , 分 岐 文 と 呼 
び ま す 。 と 和 析 が プロ グラ ム の 中 に 増え る と す ど く 上 難し く な っ 
て きち ゃ いま す 。 

頭 の 中 で 流れ を し っ か り 考 えて , プロ グラ ム を 組ん だ つも り 
Cb, わか ら な く な る よう な と と は よく ある ん で す 。 

だ か ら , プロ グラ ム を 作る 時 は , 流れ 図 を 書い て くだ さい 。 


> 流れ 図 の 事 を フロ ー チ ャ ー ト と 言い ます 。 


プロ グラ ム の 始ま り 、 終 わ 
) の 記号 — — | 
W = 
フロ ー テ チャー ト で 使う 記 党 は F 文 、 
準備 
定義 文 な を ど 、 変 数 値 の 設定 
も この 記号 


FRINT 文 、 ロロ し 晶 文 な ご それ 
ENFRDIDCO 


フフ ロー チャート を 作成 する の に 使う , 
説明 を し て お か な くち ゃ ネ !( 図 1) 
端子 


処理 (代入 文 ) 
あら ゆる 種類 の 処理 機能 に 
使え ます 


フロ ー チ ャ ー ト 記号 の 
手 操作 入力 
(INPUT 文 、 READ 文 ) 
キー ボー ド か ら 人 入力 する 時 
の 記号 


JOUOUUOU' 
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判断 (IF 文 ) 
分 岐 文 の 中 で 、 ど の 経路 へ 
進む か を 決め る 記号 


書類 
デー タ の 内 容 を PRINT 
OUT す る 記号 


表示 (PRINT 文 ) 
ディ スプ レイ 上 に デー タ を 
PRINT OUT す る 記号 


定義 済み 処理 (GOSUB 文 ) 

プロ グラ ム 中 に 定義 し て あ 

る サブ プル ー チ ン に 飛ぶ こと 

を 示し ます 。 

⑱ サ プル ー チ ン と は 、 プ ロ 
グラ ム の 流れ の 外 に 出し 
た 副 プ ログ ラム の よう な 
も の で し た ね 。 


プロ グラ ム の 始ま り , 終わ り の 記号 

準備 

定義 文 な ど , 変数 値 の 設定 も と の 記号 
処理 (代入 文 ) 

あら ゆる 種類 の 処理 機能 に 使え ます 

手 操作 入力 (INPUT X, READ X) 

キー ボー ド か ら 入 力 す る 時 の 記号 

判断 (IF x) 

分 岐 文 の 中 で どの 経路 へ 進む か を 決め る 記号 
書類 


デー タ の 内 容 を PRINT OUT する 記号 

表示 (PRINT 文 ) 

ディ スプ レイ 上 に デー タ を PRINT OUT する 記号 

定義 済み 処理 (GOSUB) 

プロ グラ ム 中 に 定義 し て ある サブ ルー チン に 飛ぶ と と を 示し 
ます 


の サブ ルー チン と は プロ グラ ム の 流れ の 外 に 出し た 副 プ ログ 


ラム の よう な も の で し た よね 

結合 子 

フロ ー チ ャ ー ト が 長く な り 結 べ な い 時 な ど に 使い ます 
ON=GOTO X, ON~GOSUB 文 に も 使い ます 

と うい う 図 を 使う と , プロ グラ ム を 書く の が 楽し く な っ て き 
そう で すね ぇ 。 

ST, クイ ズ で す 。 左 の 図 の 名 称 を 右 か ら 選 ん で 結ん で みて 
くだ さい 。 2 つ 以 上 間違え た ら 不 合格 ! 前 の ペー ジ に も どっ 
て 勉強 し 直し まし ょ う 。( 図 2) 


LISI 

18 FOR #=1 IO 9 
20 FOR v-1 TO 9 
30 PRINT RT 
48 MEAT Y 

28 PRINT 

66 NEXT ^ 

Ok 

A 


kT, と の プロ グラ ム を フロ ー チ ャ ー ト に し て み ま し ょ う 。 
( 図 3) の よう に な り ま し た 。 と と ろ で , と の プロ グラ ム 何 だ か 
憶え て る ? そう で す 。 九 九 の 計算 プロ グラ ム で し た よ ネ 。 
RUN 


1 2 3 4 5 6 7 8 9 

> 4 6 8 io i12 14 i6 18 

S 6 9 12 15 18 21 24 27 

4 8 i2 16 Pg 24 28 32 36 

2 10 15 280 25 380 35 40 45 

& 12 18 24 38 36 42 48 54 

LHe BER RE 
op 18 53 ze 48 ¿3 28 23 et 
Ed 


今度 は 4 まで の 数 当て ゲー ム の プロ グラ ム に 挑戦 し て み ま す 。 


結合 子 

フロ ー チ ャ ー ト が 長く な り 結 べ な い 時 
な ど に 使い ます 。ON~GOTO 文 、ON 
ーGOSUB 文 に も 使い ます 。 


AT 
CES 
nas 
V o N 
* oq o 
/ ! \ 
7 \ 
1 ヽ 
/ y 
/ ! i 


[e] [9] 


[9] 


o 


o 


O 


JOOMUM QO? 


O 手 操作 入力 


O 表示 


O 定義 済み 処理 


oO 端子 


oO 処理 


判断 


O 書類 


129 


FOR Y-1 <10> 


Q« > は 行 番号 


START 


<10> 
A=INT(4* RND(1)) 
+1 


IH CLS 
$8 Tr ace THEM PRINT "END":END 
46 PRINT "Ok" f 
58 GOTO 20 
さて フロ ー チ ャ ー ト に し て み ま し た 。( 図 4 ) 


〇 10 番 は 画面 を 消す 処理 で す 。 

〇 20 番 は 代入 文 で すね 。 

〇 30 番 は 判断 文 。、。 こ と で YES, NO 分岐 し て いま す 。 と と で 
YES な ら END と 表示 し て , プロ グラ ム は 終了 。 NO なら 40 
番 へ 行き ます 。 

〇 40 番 で OK と 表示 。 

〇 50 番 で 20 番 へ 戻り ます 。 


XOMOOOO 
に オキ そそ 
トー 


サブ ルー チン の 特徴 は 炉 雑 な 流れ 
の 処理 を メイ ン ル ー チ ン の 流れ の 
NEES 


u 


CAXRNDC122*1 
B THEN PRINT"?5U" 


m+ 


ELSE PRINT "nz 


gou < トト DP 
AC DON 


今度 は , 30 番 に INPUT 文 が だ 入っ て ます ね 。 え ー と …… 
INPUT 文 は 手 操作 入力 に な る わけ か な ……。 

それ で は , フロ ー チ ャ ー ト を 見 て み ま し ょ う 。 図 に し て みる 
E, わか りや すい わ ネ 。 で は 実行 させ ます よ 。( 図 5) 


っ 2 図 5 
Washes 
5 5l 

574 
ne 
了 W 


CLS «10» 


A-INT(4*RND(1)) 


今度 は , GOSUB~RETURN 文 の 使わ れ た プロ グラ ム を , 
フロ ー チ ャ ー ト で 描い て み ま し ょ う 。( 図 6) 
LIST 
1 INPUT "7?25J 395 n "iB 
58 GOSUB 188 
96 IF AB THEN PRINT "759 !" ELSE PRINT 
4B GOTO 18 
100 A-ÍINTCRNDCLOX6D 41 
118 RETURN 
Sk 


サブ ルー チン の 処理 は , とこ の よう に 流れ の 外 に 出し て , 副 プ 
ログ ラム と いう 形 で 扱う ん で す 。 わ か り ま し た ? 

本 当 は , と の 程度 の 優し い プ ログ ラム な ら フ ロー チャ ー ト は 
書か な く て も いい よう な も の な ん で すっ て 。 難し くっ て と み 入 
っ た プロ グラ ム に な れ ば な る 程 , フロ ー チ ャ ー ト は 意味 が 出 て 
id te 


図 6 


«40» 


A=INT(RND 
(Dx 6) + 1 


RETURN 


<100> 


<110> 
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LINEINPUT 


AAMC Er 
au 
ーー 
Ve 


Bows owe 


Bov me 
x +™C CC 


ーー 行 す べ で を 入力 し で て くれ る 命令 で す 。 2 つの プロ グラ ム を 
見 比べ て みて くだ さい 。 上 の 方 は , RUN する と 10 番 , 20 番 と 
"サン デス ” を つづ け て 一 行 で 書い て くれ ます 。 ア ナタ ノ ナ マ 
ェ ハ マツ マ の ? が 出 て と な い の も INPUT と の 差 ノ (i64) 

Cb, 不便 な 点 も あっ て , 必ず スト リン グ で な けれ ば , LINE- 
INPUT で きま せん 。 まあ, 場合 に より , うま く 使 いわ け て く < く 


だ さい ネ 。 
LPRINT 
lprint "HUDSON" 
LINEINPUT X$ rint "HUDSON" 
この 命令 は 、 読 ん で 字 の ご と く 、 今 HUDSON 


カー ソル の ある 一 行 す べ て の 文字 を 取 


り 込 みな さい 、 と いう 命令 で す 。 
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直接 プリ ンタ に , 表示 を 出し な さい と いう 命令 で す 。 で すか 
ら , PRINT の 内 容 は ディ スプ レイ に は 現れ ませ ん よ 。 実務 用 
に は 使い 道 の 広い 命令 で す 。 

PRINT USING 

Print using “###. ##” 5 a 
と ん な 形 で 使い ます 。 前 も っ て 指定 され た a は 12345. 12345 
と し まし ょ う 。( 字 65) 


a=12345. 12345 
Oi 
erint usina "HW8SHHHH.HH":a 
deme he 指定 が 5 桁 な の で ひと つ 
print usina "##ĦĦ#ĦH#H#" ja スペ ー ス が あき ます 。 
erint "sing "Total-HHHHH.HHHHH'":a 
Total=leo4 12345 
print usina "####H. HHHH" ia 
ormat over 
Ok 
ES 


プロ グラ ム を 見 て も ら え ば 分 か る の で す が , 整数 部 は 今 5 桁 
と 指定 され て いる の に , # を 4 桁 で 出力 させ よう と する と エラ 
ー が 出 て し まい まし た 。 と の Print Using を 使用 する 時 に は , 
あら か じ め 桁 数 が 増え る と と を 見 越し て , 余裕 を 取っ て お いて 
くだ さい 。 

と の よう に , スト リン グ の 中 に # 以 外 の も の を 入れ れ ば , そ 
れ は その まま プリ ント アウ ト さ れ ま す 。 


print usina "'"HHHHH.Hd'":12245.057 
122435) 567 
Sk 
print usina "Yuri fH. ##"s 12.54 
rl 12.34 

また 上 の よう に , スト リン グ ス の あと に 直接 セミ コロ ン で つ 


な げ び げ て 定数 を 指定 し て お いて も いい わけ で す 。 と ん な 説明 し か 


で き な い ん で すけ ど , あと は プロ グラ ム と に ら め っ と し な が ら , 


ゆっ くり 考え で て くだ さい ネプ 


USING 書式 指定 
PRINT USING 


に よる 書式 指定 は 、 数 値 型 と 文字 型 の 


2 種類 が あり ます 。 
(数值 型 
$ 指定 し た 最大 の 桁 数 よ り 数 


値 の 桁 数 が 小さ きい と き は 、 右 づ ゅ で 表 

示さ れ ま す 。 

PRIMI USING "#HHHHH" 
45 


固定 小数 点 の 表示 で 、 小 数 
点 の 位置 を そろ える 指定 に は ・ を 使い 
ます 。 小 数 点 以下 の 桁 指定 も 行え ます 。 
PRINT USING "HHH. HH" 


ga 
de 


この 指定 で は 、 小 数 点 以下 第 2 位 で 四 
捨 芋 入る れ ま す 。 

, 数 値 を 3 桁 ご と に 区 切っ て 、 
そこ に , カン マ を 入れ て 右 づ めで 表示 


十 上 一 十 と 一 は 、 数 値 を 表示 する 
と き に 、 十 と 一 の 符号 を どこ に 表示 す 
る か 指定 し ます 。 


PRINT US +", 
PRIN ING "HHHH 


apo 

PRINT USING "-####", 
1234 

-1234 

Ok 

& 


* o 桁 の 指定 を し て 、 そ の 範囲 
内 で スペ ー ス が ある 場合 、 す べ て ※ で 
うめ る と いう 指定 を し ます 。 
PRINT USING "*#####H# 
400234 


¥¥ 数 字 の 前 に マー ク を つけ 

て (て れ ま す 。 

PRINT USING "¥¥## 

"3234 ilo 
¥234 


e 

**x 米 米 と \\ を 組み 合せ た も 
OCT, 数字 の 前 に \ を つけ て 、 そ の 
範囲 内 で スペ ー ス が ある 場合 、※ で う 
did, 
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USING" ##¥####" 


^^^^ 桁 数 指定 の # の 後に 置く と 
エキ スポ ー ネ ン シャ ル に て 表示 で きる 
よう に が ひま すず 。 


PRINT USING "WW. HHHO 
2.340É+02 
ok 


1 つの USING 文 で 複数 の 変数 、 実 数 
を 記述 する と 、 そ の 変数 、 実 数 すべ て 
に 対し 、USING 指 定 し た と みな され 


! これ を 指定 する と 、 文 字 変 
数 、 文 字 列 に ある 文字 の 最初 の 1 文字 


の み 表示 し ます 
PRINT USING "!"3 "ABC 
A 
Rk 

$=" XYZ" 
PRINT USING "!";f$ 
g“ 


& & lUEXTve&L&oA^ 
ー ス の 個数 + 2 個 分 表示 し ます 。 文字 
は 、 左 づめ ゆで 、 ス ペー ス の 個数 2 个 
以下 の と き は 残り の 右 の 部 分 を スペ ー 


ス で うめ ます 。 

A$="HUDSON SOFT" 
PRINT USING "8 & 
HUDSON 


INT USING "& 
HUDSON SOFT 
Ok 


GO 他 

USING の 書式 指定 以外 の 文字 が あ 
る 場合 は 、 そ れ を その まま 表示 し ます 。 
ERIHT ¿USING "PURI ## 
dur ise 
RINT USING "HHH.HH 
733.3 23. 
ar .45 sec 
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KEY 1, "AUTO"+CHR$C(13) 
KEY 2:;"?7TIMES$"-CHR$t135 
KEY os KEY" 

KEY 4, "LIST"+CHR# (26,133 
KEY 3. "RUN  "*CHR$C13) 
KEY 6, "LOAD "+CHR$C13) 
KEY To "MIDIH " 

KEY 8, "CHR#¢" 

KEY os PALET " 

Br ee "EDT ttp ieee? 
4 


ファ ンク ショ ン KEY を 使う 命令 で す 。 フ ァ ン クシ ョ ン KEY 
5 つと |SHIFT|T フ ァ ン クシ ョ ン KEY C, 計 10 個 の KEY が あ 
る と 考え られ ます 。 そ の 1 つ ] つ よく 使う コマ ンド な ど そ を 
入れ て お く と と が で きる ん で す 。 いちいち KEY kK HB 
が 省け ちゃ うと いう わけ 。( 呈 66) 


key 1>"INPUT" 


Ok 

KEVLIST 

HET la IMPUFI* 

KEY > "?TIMES"+CHR$(13) 
KEY 32 REY 

KEY 4; "LIST"*CHR$C26;13) 
KEY S- "RUN  "*CHR$GC13? 
KEY 63 "LOAD "t*CHR$(13) 
KEY T>"WNIDTH " 

KEY 8» "CHRECLC" 

KEY Si TPALET * 

BE Si Se Senne C A S 
i 


と の プロ グラ ム を 見 て くだ さい 。 と の よう に , 10 個 まで 入れ 
て お ける で し ょ う 。 電話 で いえ ば , 短縮 ダイ ヤル と いう と と ろ 


1:"VURI"-*-ocohrn$613»5 


这 


H 
I4 n 
T u 

リ + ォ CHR ま く (138) 


30 て て て て て て エエ て て て L 
ag 
E 


XC た mmmmrmmmmmm MEA 
da e 


本 心急 无心 天 大 天 天 天 天 天 天 大 大 ROK 


ECAC, 上 の プロ グラ ム を 見 て み ま し ょ う 。 KEY] を 押し 
た ら , Syntax error が 出 て し まい まし た 。 ど うし て か な あ …? 

結局 , KEY 1 の CHR$(13) と いう の は 余分 な ん で すね 。 た 
だ YURI と 入れ て ある だ け で PRINT 命令 も し て な いわ け だ 
か ら , キャ リッ ヂ ・ リ ター ン を 示す CHR$ (13) は 不用 ノ 
Urb, KEY1 を 書き 直し まし ょ う 。 
eu 1: "erint uuri"tchr$C13) 
LIST 


OOK 


Alm 


H 
E^ : 
"+CHR$ (13) 


Bo で つ 大 大 大 大 大 大 大 大 大 大 RON 
FOO. MMMMMmMmmmm ma 
m. CCC 
Jl 
OUVOE A X36 


と と で は , CHR$ (13) は し っ か り 意 味 を 持っ て きま すね 。 た 
だ まだ KEY 1 に は 困っ た 点 が ある ん で す 。 KEY 1 を 実行 し 
た 時 , YURI は 変数 扱い に な っ て いま す 。 と れ を 文字 列 で 扱わ 


電源 打 入 時 の ファ ンク ショ ン キ ー 
設定 
電源 打 入 時 は 、 左 上 KEYLIST の 


な お 、CHR $ (13) は キャ リッ ジ ・ リ 
ター ン 命 令 で 、 こ の KEY だ け で CR 
まで 完了 し て し まう の で す 。 
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156 


1. "print"+ohr*(c343)+"Yuri"+ohr$«13)> 
LIST 


过 


"Yuri"+CHR$ (13) 


Bocs ご 大 大 大 大 大 大 大 大 大 大 ROK 
xc xmmmrmrmimmrmrmrm Mx 
T-C-C-C-C-C-C-C-C-C-C て 
Ug 


さて 次 は と の プロ グラ ム で す よ 。 は ほら ね 。 と ん な 風 に CHR$ 
(34) を 入れ て お け ば , きち ん と スト リン グ 扱 い を し て くれ る 
ん で す 。CHR $ (34) は , ダブ ルク ォ ー テ ーション で す 。 

で も , と と で は ダブ ルク ォ ー テ ーション が , 最初 だ けし か つ 
いて な いわ ね 。 とれ で も 大 丈夫 な の か し ら ? 


rint "Hudson 
uasan 


rint "Hudson: a=1 
[IPS I. amA 


Ban "Hudson" a=1 
udson 


7 
ます か ら ね 。 

INKEY $ 

変数 A$ の 中 に 何 か 一 文字 分 と り 込 みな さい と いう 命令 で す 。 
で すか ら 一 文字 の み の 判 断 で , プロ グラ ム が 進ん で いき ます 。 


Monmnmr- 
OOO: 


ちょ っ と と の デ ロ グ ラム を 見 で 《 定 きい 。 


180 a$-inkeus$:if af="" then ið 
20 print af 
38 goto ið 


RUN させ て , 文字 を 打ち 込ん で み ま し ょ うか 。 4 dfgsd… 


な ん て 最初 の 行 に 打っ て み ま し た けど , ディ スプ レイ に は 1 文 
PF つた て 区 表示 きれ まし た 。 


run プロ グラ ム の 10 行 を 見 て 下さ い 。 
d “ "と あり ます が 、 こ れ は スペ ー ス 
+ で は あり ませ ん 。 も し a$ に 何 も 
a 入ら な か っ た ら (つま り 、KEY 
z 入力 が な か っ た 時 )、 入 力 が ある ま 
d で 待ち な さい と いう こと で す よ 。 
J キャ リッ ジ ・ リ ター ン を 押さ な い 
a で 入力 され て し まう の で 、 例 えば 
= リア ル タ イ ム ゲ ー ム の 様 に 、 ス ピ 
i ー ド を 要求 され る 時 便利 で す 。 
Break in i18 

Ok. 

E 

18 input af 

20 print a$ 

ヨロ goto 15 

run 

? d 

c 

? + 

十 

7 g 

る s 

= 

? d 

al 

T d 

2reak in ið 


Moo 
A 


INKEY$ の 意味 は わか っ た か し ら ? と の 2 つの プロ グラ ム 
を 比べ て みて くだ さい 。 INPUT 文 で は ? と 聞い て くれ る 点 も 
違い ます よね 。 INKEY$ を 使っ た 例文 を 作っ て み ま し た 。 
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INKEY$ は 1 文字 取り 込み な さい 
と いう 命令 で 、 複 数 個 の 文字 を 取り 込 
む 時 に は 使用 で きま せん 。 


68 
REPEAT ON 
リア ル タ イ ム ゲ ー ム な ど を PLAY 
する 時 、 キ ー の 先行 入力 が 入っ て し ま 
い 、 肝 心 な 時 に 思う よう な 動作 を し て 
《 れ な か っ た こと は あり ませ ん か 。 Z 
ん な 時 に この 命令 を 使う と 万 事 解決 。 
先行 入力 は 受け 付け ませ ん 。 


REPEAT OFF 
この REPEAT OFF を 実行 する と 、 
プログ ラム 作成 中 、 同 じ キ ー を 押し 続 
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け て も 1 文字 し か 書い て くれ ませ ん よ 。 


F a$-2"" THEN 18 
$5 


と れ は , 1 文字 を アス キー コー ド に 変換 する プロ グラ ム で す 。 
と ん な プロ グラ ム に は , INKEY$ を 使う の が 適し て ます よね 。 


neu "Try again (y or Nn" at 
a$-"n"then end 
t a 


FICK OOO: 
cs 
fu 
2 
fu 
n. 
3 
r 
に 
o 
3 
E 


BoM obw 


と れ は , よく プロ グラ ム で 使う 判断 文 で す 。 Y, NIXFT, 
進路 が 決ま る わけ で , と の 場合 も INKEY$ は 便利 で す 。 
(167) 


変数 の み を すべ て 0 に し て し まう 命令 で す 。 プ ログ ラム を 見 
て くだ さい 。 NEW と 違う の は わか る で し ょ ? 

REPEAT ON, REPEAT OFF 

KEY ボー ド を 押し て いる 間 , その 文字 を 出し つづ け て くれ る 
の が , REPEAT ON, REPEAT OFF に し て お け ば , 1 回 表示 
4 $5720 CY, (68) 


repeat on 
Ok 
aaaaaaaaaa 
repeat off 
Ok 

all 


AUTO 

一 行 ど と に 10 番 お き の 番 号 を , 自動 的 に ふっ て くれ る 命令 。 
AUTO1,1 だ っ た ら 1 か ら 1 番 お き に , AUTO 100,.10 だ っ た ら 
100 か ら 10 番 お き に うっ て くれ ます 。 と うい う 指 定 も で きる ん 


auto 188,18 
print "Yuri" 


a 
B print "Shinagawa" 
8 dd "Hudson" 


DELETE 

部 分 的 に プロ グラ ム を 消す 命令 。 DELETE 30 な ら ば 行 番号 
30 を 消し て くれ ます 。DELETE 30 一 60 な ら ば 30 番 か ら 60 番 が 
消え ます よ 。 

も ちろ ん , 30[RETURN]- し て も 30 番 は 消え ます 。 ただ, 30 
番 か ら 60 番 まで 一 度 に 消す 事 は で きま せん よね 。 [RETURN] を 
使う な ら , 30 [RETURN] 40 [RETURN] 50 [RETURN] と し な 


きゃ ネ ノ 


list 

18 PRINT "Yuri" 

26 PRINT "Shinagawa" 
36 PRINT "Hudson" 

46 PRINT "Soft" 

SO PRINT "Dr. Bee" 

66 PRINT "ai" 

Hi PRINT "SHARP" 
delete 38-680 

Ok 


7 
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CONSOLE 命 令 は 、 画 面 内 の 文字 
を 表示 する エリ ア を 設定 する 命令 で す 。 
CONSOLE Y1,Y2,X1,X2 
Yi= 垂 直方 向 の 表示 を 開始 する 行 位置 

(0 —24) 
Y2= 重 直方 向 0 表示 行 数 (1 一 25) 


X ュ = 水平 方 向 の 表示 開始 文字 位置 
WIDTH40 の と き 0-39 
WIDTH80 の と き 0-79 

Xz= 水 平方 向 の 表示 文字 数 
WIDTH40 の と き 1-40 
WIDTH80 の と き 1~80 

テキ スト 画面 (文字 の み を 表示 する 

モー ド ) に 対し て 、 文 字 の 表示 エリ ア 

を 設定 し ます 。 こ の 命令 の 実行 後 は 、 

指定 し た 長方形 の エリ ア 内 だ け に 、 文 

字 を 表示 する こと が で きま す 。 


画面 クリ ア や 、 ス クロ ー ル も この エ 
リア 内 で 行わ れ ま す 。 カ ー ソ ル も この 


設定 位置 内 だ け で 移動 し ます 。 
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画 つ コツ ド ロー 
E, 
TTT 
AAA 
Sie 
ZZZ 

ゴー ゴゴ 


EDIT 
指定 の 行 を リス ト し て くれ ます 。 
な ん か に 使い ます ね 。 


1 行 だ け を 書き 直し た い 時 


T a shinagawa" 


PD OR 
Wor ogre: 


T "yuri shinagawa" 
CONSOLE 


実行 する 画面 の 指定 で す 。( 補 "69) 
CONSOLE 10, 8, 10, 8 


y 座 標 8 行 分 x 座 標 8 行 分 
DEY, y 軸 の 10 か ら 8 行 分 と り , x の 10 か ら 8 行 分 と っ て , 
その 範囲 を 画面 と し て し まう と いう 事 で す 。 命令 は その 範囲 の 


中 で 実行 され る ん で す 。 


画面 は , と ん な 小さ < く 指定 され て し まい まし た ネン ノ ( 図 7) 
console B; 25:0, 406 元 の 画面 に も どす 時 は この 様 に 指 
Ok 定 し ます 。 

回 

list 

18 PRINT "Yuri "s 
Sh GOTO 

console 10,8,10,8 
Ok. 

i Puri T 

uri Yuri 

Yuri Yu 
ri 
Break in 

18 
Ok. 

"a 


TR ON 
トレ ー ス 機能 を ON と する 命令 ) と いっ て も わか ら な いで し 


ko トレ ー ス 機能 と は , 今 実 行 し て いる 命令 の 行 番号 を 頭 に 表 
示し て くれ る 命令 な ん で すね 。 
例文 を 見 て み ま し ょ うか 。 


list 
180 PRINT “Yuri "3 
26 GOTO 1 
Ok 
tron 
Ok 
run ] 
C Oluri L281Lia8J"uri C261 CigslYuri L281EL 
18]"vuci L28021L18J*"vuri C201C101lYuri L281L1 
Blvuci L281L181v"urci 上 ご ロゴ 上 1 ロロ ビュ L281L168 
JYuri C281 018) Yuri [261l[14B1Yuri [2611106] 
Yuri E251016] 
Break in 16 
Ok. 
a 
TR OFF 


TR ON に し て 始ま っ た トレ ー ス 機能 を 止め る の が TR OFF, 
と の 命令 に よっ て , また も と の プロ グラ ム を 実行 し て くれ る よ 
SiS OFT, 


OconmPp- 
EIA Oe: 


Yuri Yuri Yuri Yuri Yuri Yuri Yuri Yuri 
Youre Wei Yuri Yuri Yuri Yuri Yuri Yun 
Yuri Yuri Yuri Yuri Yuri Yuri Yuri Yuri 


WIDTH 

画面 の モー ド を 指定 する 命令 で す 。 X 1 は 40 文 字 モ ー ド と 
80 文 字 モ ー ド の 2 つの モー ド を も っ て いま し た よね 。 通常 の 状 
態 で は 40 文 字 モ ー ド で すか ら , 80 文 字 モ ー ド に し た い 時 , また 
は 80 文 字 モ ー ド か ら 40 文 字 モ ー ド に 戻し た い 時 に 使い ます ね 。 
下 の よ うに た 字 の 大 き さ は , ぜん ぜん 違っ ちゃ いま す 。 


width 48 
Hudson sott 
width 88 


Hudson soft 
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70 

HuBASIC な ら で は の 命令 、LAB 
EL (ラベ ル 廊 ) で す 。 

プロ グラ ム を 組ん で 行く 上 で 、 今 後 
サブ ルー チン に し ょ よう 、 こ の 処理 は あ 
と で 考え よう 、 な ど と 頭 の 中 て 流れ を 
考え て 組ん で 行く 時 、 サ プルー チン 等 
の 飛び 先 が 決ま ら な い 時 に 威力 を 発揮 
し ます 。 
GOSUB "サイ サン リ 
ON M GOTO "sy9*,","LE 
veu, meis yog nnm 
この 様 に 書い て お き 、 処 理 ル ー チ ン が 
決ま っ た ら 、 
LABEL "7492" 
LABEL "559?*5" 


な ど と 、 飛 び 先 の 頭 に LA BEL 廊 を 
書い て ち お くだ け で 良い の で す 。 

も ちろ ん リナ ン バ ー さ れ て も だ いじ 
ょ うぶ で す よ 。 


サ プ ブルー チン を 表示 する REM 文 の 


代わ り に も 使え ます ね 。 
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LABEL 
ON---GOTO 文 や , IF--GOTO 文 な どの よう に , 条件 に よっ 


て ジャ ンプ させ る 時 に , と て も 有効 な 命令 で す 。 

ON…GOTO な ど で は , 飛ぶ 先 を 直接 番号 で 指定 し て や ら ね 
ば な り ま せん が , LABEL を 使え ば , GOTO の 後に 書か れ た ス 
トリ ング と 同じ も の を 見 つけ て , そ と へ 飛ん で くれ る ん で す 。 

LABEL の 役割 は , スト リン グ の ある 場所 を 示す 事 な ん で す 
ね 。 名 前 の 通り ,。 プロ グラ ム 中 に ラベ ル を つけ て くれ る わけ で 


[e] 


f a$2"" then 16 
en "Yuri" 


Bo»x»5wournomnm + 
FOCON 


例え ば 次 の プロ グラ ム で は , LABEL の つい た 文 は 実際 に は 
何 も し ませ ん が , 飛ぶ 位置 を 指定 し て プロ グラ ム の 流れ を 決め 
て くれ て ます よね 。( 呈 70) 


0 


QU aU Go 3 


RNDC1»5-412») : 
o"Yuri",)"Shinagawa"» "Hudson" 
n 


X TOP COCOCOCOCOCOCO CO CO C s 
QU OXDTOmDDPOZ I 
DD エコー ロゴ コー ロゴ ーー 
AHMOZMOZMon Z 


Bono oo0-10w4 corner 
OOO 


list 

180 a-INTCSXRNDC125-*12? 
20 ON a GOTO 58.880.110 
38 GOTO 10 

20 PRINT "1% 

60 GOTO 18 

Ba PRINT "2"; 

98 GOTO 164 

1180 PRINT "3" 

126 GOTO 16 

Ok 

E 


STOP と END の 違い 

さて , プロ グラ ム を 見 比べ て み ま し ょ う 。 簡単 に 言っ て し ま 
AH, CONT (コジ ティ ニュ ー) が で きる の が STOP で 。 プ ロ 
グラ ム が 完全 に 終わ っ て し まう の が END で す 。 

END で 終わ っ た プロ グラ ム を 続け よう と し て も Cant con- 
tinue と いう 表示 が 出 て き て し まい ます 。 どちら の 場合 も , プ 
ログ ラム を 一 通り 実行 し て 止ま る の は 同じ と と で す 。 


18 print "Hudson" 
20 stop 
3H goto ið 


Break in 20 
Ok 


c 

Hudson, 
Break in 20 
Ok. 


18 print "Hudson" 
20 end 

38 goto ið 

run 

Hudson 

Ok 

corrt 

pns continue 


Moo 


CFLASH 1 

白 と 黒 が , 交互 に 点滅 する 命令 で す 。 と の 命令 を 人 人 れ て お け 
ば , プリ ント 内 容 が チカ チカ と 目立ち ます か ら , 強調 させ た い 
時 に は いい で すね 。 

CFLASH 0 

フラ ッシュ を 止め る 命令 で す 。 
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SREY キャ ラク ター リバ ー ス 
の 命令 は 文字 の 表示 モー ド を 、 正 
常 モ ー ド ヵ 反 転 モ ー ド か の 切り 換え を 
行う 命令 で す 。 
CREV ノー マル モー ド 
正常 モー ド 


CREV 4 ソバ ー ス モー ド 
反転 モー ド 
この 命令 の 実行 以降 、 文 字 は すべ て 
指定 され た 表示 モー ド て 画面 に 表示 る 
れ ま す 。 
ノー マル モー ド ABC as 


CGEN キャ ラク ター ジェ ネ レ ー タ 
キャ ラク ター ジェ ネ レ ー タ を 、 標 準 
の (JO ROM) を 使う か 、 ユ ー ザ 
ー キ ャ ラジ ェ ネ (自分 で 設定 し た キャ 
ラク ター ジェ ネ レ ー タ ) を 使う か の 表 
示 モ ー ド 切り 換え で す 。 


ノー マル モー ド 
CGEN B ROME 124) 


ユー ザー 文字 モー ド 
CGEN 1 (RAM キ ャ ラジ ェ ネ ) 
この キャ ラク ター の 定義 は 、 別 の 項 で 


説明 いた し ます 。 


図 8 


9 
この よう に UNT1L で 
成立 し な けれ ば 、 何 
回 で も REPEAT し ます 。 
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ash i 
ash Y 


Moo oo 
x AX + 
Tm = 


CREV 

CGEN 

と っ て も むず か し く て わか り ま せん で し た 。 
BEET. (=71) 

WHILE/WEND 
WHILE と WEND は 対 に し て 使わ れ , と の 間 で ルー プ し ます 
(同じ と と を くり 返し ます )。 ル ー プ する 条件 は , WHILE の 後 
に 記述 し , 条件 が 成立 し て いる 間 は ルー プ し 続け ます 。 わ か る 
か し ら …? 注意 する の は , 条件 が ルー プ の 最初 で 判断 され て 
OZAT, 場合 に よっ て は , 一 度 も ルー プ し な いで 通り ぬけ る 
と と も あり 得る ん で す 。 と の 点 が , 後 で あげ る REPEATY 
UNTIL と の 相違 点 で す 。 

Tapy /ELTÀASXSLIAS: o CEd 8) 

繰り 返す 操作 の 前 に 条件 が 判断 され る ん で す 。 も う 大 丈夫 で 
し 

REPEAT/UNTIL 

WHILEB/WEBND と 考え 方 が 似 て いる と と ろ も ある の で , 混同 
し な いよ うに ノノ ( 図 9) 

REPEAT と UNTIL は 対 に し て 使用 し , と の 間 で ルー プ を 
くり 返し ます 。 ルー プ 条 件 は UNTIL の 後に 記述 し , 条件 が 成 
立 す る まで ルー プ を 続け ます 。 注意 する の は , 条件 が ルー プ の 
最後 で 判断 され て いる 点 で , 少な く と も 1 度 は ルー プ さ れる 結 
果 と な り ま す よ ね 。 CORD WHILE 一 WEND と 区 別 さ れ ま す 。 

と の よう た, UNTIL で 成立 し な けれ ば 何 回 で も REPEAT し 
ます 。 しっかり 頭 に 入れ て お きま し ょ う 。 


も っ と 勉強 し て 


DEF FN ( デ デ ァ イン デ ァ シク ジョ D 

自分 の よく 使う 関数 を FNX(a) と 定義 する 命令 で す 。 双 と い 
う の が 関数 式 を 示し , a は 関数 式 に 直接 いれ る 変数 で す 。 
18 def +nxta?=sarta) 


2B input a 
30 print fnxca» 


と の プロ グラ ム が 基本 的 な 使い 方 で す 。 


B a ョ = ラロ : 
print +nxta?. 
def +fnxta=sintakpaiíd>/r185> 


n 
defined function in 20 


DEF FN は , 必ず は じ め に た 指定 し て くだ さい 。 上 の プロ グ 
ラム で わか る と 思い ます が , Bic FNX(a) を 書か せる 命令 を し 
Tb, FNX(a) の 内 容 を 決め て あげ て いな いわ け で すか ら , 何 
も 書け な いで し ょ う ? S&L, FNXCa) €, 2 度 以 上 定義 し て 
し まっ た ら , どん な 事 に な る ん で し ょ うか 。 


18 def fnxía)-saría? 
20 def fnxita»-2sinta? 


SE a=30 

4 print fnsta)? 

run 

Duplicate definition in 28 
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私 の 予想 で は , 新しく 定義 し 直さ れ た 方 で 実行 し て くれ る と 
思っ た の に , 結果 は , と の 通り 。 一 つの 変数 は , 当然 の 事 で す 


が 一 つの 関数 し か 定義 で き な い の で す 。 
18 dedi USB EL RUFUS LA 


a= 
38 print fnxia? 


run 
E 
Ok 
* 
180 def +fnx(a?=sintakxpaitd?r/190) 
25 def fnuca»-costaxXpaitci»1880) 
30 a=30 
46 print +fnx(a>»+fnuta>? 
run 
.5 。 8660254 
Ok 
E 


と れ ら は DEF FN を 使っ た 実行 例 で す よ 。 と の よう 定義 さ 
れ た 関数 が , 長け れ ば 長い ほど DEF FN の 利用 価値 が あり ます 
kit, SEC, 式 を 通し た 結果 だ け を 先 に A な ど と いう 形 で 
定義 し て お く 事 は 可能 で し た が , DEF FN の よう に , 式 そ の も 
の の 定義 は 無理 で し た よね 。 実際 に プロ グラ ム を 書い て みる と , 
と の 命令 が いか に た 便利 か が わか る よう で す 。 

10 for i=36 t 


35 
26 print sintikpai (4) 7189) 
36 next i 


OK 
E sin(aXpeaiti1»7/180»5 


ANANN 
NAAMI 
(OO よい MI 
VIF OWS 
WOR 0) 
MNOO 
JONO 


Bc 
e NL 


上 の 方 の プロ グラ ム で は , 30~35 度 まで の sin を 求め て いる 
の で す が , 下 の 方 の よう KC DEF FN を 使っ て 書き 直し まし た 。 

上 と 下 は , 結局 同じ と と で す が , 上 の 20 番 の Print, sin (ix 
pai(1)/180) は , 今 組 まれ て いる 10 番 一 30 番 の FOR て NEXT 
ルー プ 内 で し か 実行 さき され ませ ん か ら , プロ グラ ム を の ば し て , 
も う ひ と つ FOR-NEXT ルー プ を 入れ , 同じ 事 を させ る な ら , 


また 20 番 の 式 を ど と か に 入れ て や ら な けれ ば な ら な いわ け で す 。 

DEF FNX(a) で 1 度 定義 し た 関数 は , プロ グラ ム の 中 で ど 
ん な た 飛ん で も 大 丈夫 ノ FNX(a) と すれ ば , いつ で も 答え は 
出 て きま す よ 。 DEF FNX( ) の ( ) の 中 は , noz Œ) 
の ある 限り 入り ます 。 次 の プロ グラ ム は その 例 で す ネ 。 


det fnsta: bi =akbtarb 


- 


K 
print ご ※ ヨ + オ ビデ ゴジ 
6: 6666667 
OK. 
print triitls 32 
6»: 5666667 
OK 
ia 
ið def fnxCa,bi=atb 
20 a=2:b=3 
38 print f#nxta;b) 
run 
S 
OK 
| 
rá fnx=Ca» bso: go e>=akb+okxdr/e 
a 


DEFSTR (デラ スト リッ シグ ダ ) 
次 は デフ スト リン グ と いう 命令 で す 。 


def str a 
aa error 


O 
Sew" a 
a=" Yuri" 
Ok 
a="Yuri " 
Ok 


a 

hy tah 
pe mismato 

Ok 


さっ き 勉 強し た DEF FN の よう に , DEF STR と 離し て 書い 
た ら エ ラー メッ セー ジ が 出 て きち ゃ いま し た 。 デ フス トリ ング 
は DEFSTR と 書き ます 。 


と の 命令 は と くに 難し いも の で は な く て , ストリ ング を 変数 
で 定義 する 時 , $ マー ク を 省 い て よい と いう も の で す 。 a$= 
“YURI” を DEFSTR a と し て お け ば , a=*YURY と 書い て も 
良い の で す 。 DEFSTR 後 に 指定 し た 変数 は , その 後 の ア プロ グラ 
ム で は すべ て $ が つい て いる と 考え て くだ さい 。 た だ その $ が 
隠れ て いて , 目 に は 見 えな いと いう だ け …… z 

前 の プロ グラ ム の 中 で a=1 2 3 と 書い て , な ぜ タ イプ ミス 
マッ チ に な っ ちゃ っ た か は わか っ た で し ょ 。 A$=1 2 3 と 書い 
て いる の と 同じ だ か ら で す よね 。 
defstr a.b.s.z 
defstr a-z 
ze yup" 

a Shinagawa” 
TN 


rint a 
uriShinagawa 
Ok 


DEFSTR a,b,s,z と すれ ば , a, b, s, z か ら は じ ま る も の す 
べ て の 後に $ が 隠さ れ て いる と 思っ て くだ さい 。 


de+fstr a 
abcd="Media" 


Bows TL oO 
xXO035X03*xXPXmD35x 


も うわ か っ た と 思い ます が ,DEFSTRa と し て あっ た と し た 
5, a-'YUR T, abcd="YURI” で も 良い と いう 事 で す 。 
DEFSTR az と し て お け ば , 頭 の 文字 が 8a か ら zZ ま で だ っ た ら , 
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すべ て $ が つい て いる と 考え られ る わけ で , どん な も の で も そ 
の あと に $ が つい て いる の と 同じ 事 だ と いえ ます 。 


af=Yuri 
Tupe mismatch 


a=1234 
defstr a 


a-i234 
Tupe mismatch 


a="Yuri" 
Ok. 

rint a 

Lar’ 1 

k 

DEFINT (デフ イン テ ジ ャ ー) 

と れ も と の よう に つなげ て 書い て くだ さい 。 ある 程度 予想 が 
つく で し ょ う が , と の 指定 を 入れ た あと に 出 て きた 数 字 は , 2 
部 小数 点 以下 を 切り 捨て た 整数 の 形 で 表示 され ます 。 プロ グラ 
ム を 見 れ ば , 一 目 瞭 然 ! 
a=3.1415927 
Ok 


print a 
p MUT 


o 

defint a 
a=3.1415927 
Ok 


print a 
3 


指定 の 仕方 な ど は , すべ て DEFSTR と 同じ 。 と ん な 命令 が 
あれ ば , サイ コロ ゲー ム な ん て 簡単 ネ え 。 ど うし て も っ と は や く 
教え て くれ な か っ た ん で し ょ う ネ ………"。 

DEFINT の 応用 例 と し て , サイ コロ ゲー ム の プロ グラ ム を あ 
UTES ELIA 
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Mo 5oumerr 
ALOT OOO 


DEFDBL (デフ ダブ ル ) 

この 指定 を し て お け ば , 全て 倍 精 度 (16 け た ) で 表示 し て < 
t xd. 下 例 が あり ます か ら わ か る で し ょ 。 通常 は 単 精度 で 
すか ら , 有効 数 字 8 けた まで で , 8 けた 目 は 9 けた 目 を 四 捨 五 
入 し た 数 字 と な り ま す 。 と と で は , 123456789E+15 
と な っ て ます ね 。 その 他 の 指定 の 仕方 な ど は , 全て DEFSTR, 
DEFINT と 同じ で すか ら 参 照 し て くだ さい 。 


PE 

print a 
1.2345679E+15 

Aefdbl a 

y ROBLE 
print a 

AR A ie 

DEFSNG (デフ シン グル ) 

DEF FN, DEFINT, DEFSTR 等 , ディファ イン (デフ と は 
実は DEFINE: 定 義 す る の 略 だ っ た の で す ) 命令 を 解除 する た 
め の も の で す 。 DEFSNG a, b と すれ ば , a, b か ら 始 まる も 
の だ けが 解除 され ます か ら , 部 分 的 に も と に 戻す と と も 可能 な 
わけ で す よ ね 。 

その 他 , DEFINT の 指定 を し て ある 時 に , 突然 小数 点 以下 第 1 
位 を 調べ た いと いう 場合 に , 便利 で す 。 
de+fsna a-z 


defsna a:b 
Ok 


| | | | | | i 


Bb 11 リー| | 1 1 B 
ON 


y 


| 11 1 
ELI IL 
yi i | El 


PLAY E" 
COEFGAB 


= 


コン ピュ ー タ に 音楽 を 演奏 させ る と と が で きる な ん て , 知っ 
Xx GET 

と ん な 機械 に ホン ト に だ 音 が 出せ る の か し ら ね え …… ? 先生 
は 「 バ バカ に し ちゃ いけ ませ ん よ 」| な ん て 言っ て ます 。 


&S PLAY (RR) CBS (CDE 
GAB) cEnicR(W) DHEA 
ARLES/ 


PLAY" CDEF GAB” 
Ok 


づ 0p 


まあ , 本 当 に 音 が 出 た わ ノ PLAY が 音楽 を 演奏 し な さい と 
いう 命令 で す 。 (172) 

音 名 の 指定 は CDEFGAB と いう よう に し ます 。 

と の 8 音 に プラ ス し て , # の 記号 も 使え ます 。 半音 の 指定 は , 
全部 と の シャ ー プ で する ん で すっ て 。 


72 ai 

X 1 は ブロ グラ マブ ル ・ サ ウン ドジ 
ェ ネ レー タ 回 路 を 持っ て な り 、 各 種 の 
効果 音 を 容易 に 作り 出す こと が で きま 
T. 内蔵 スピ ー カ ー 又 は テレ ビ の スピ 
ー カ ー か ら 、 8 オク ター プ 3 和音 の 音 
楽 を 楽し むこ と が で きま す 。 

この 項 は 、 音 楽 家 の ユ リ ち ゃ ん の 説 
明 で 進行 いた し まし ょ う 。 


と の よう に な り ま す よ ね 。 それ か ら 。 休 符 の 記号 は R で すっ 
て 。 た ぶん 英語 の REST か らき て る ん じゃ な いか な あ …… 
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次 に オク ター プ 【 斉 の 高 さ ) こ 長 さ 
の 指定 、 これ で 音楽 の 要素 が 全て 出 
ID 7ED/ 

さて , 音 名 を 指定 し た の で , 次 は オク ター ブ と 音 長 を 順番 に 
説明 し て いき まし ょ う 。 

さっ き の PLAY “CDEFGAP” は …… 

PLAY" O4CDEFGAB" 

と 同じ 事 な ん で す 。 

オク ター ブ は 8 個 ま で で , 基準 に な っ て いる の が 04。 つ まり , 
O4 を 中 心 に , 数 が 大 きい 方 が 高音 と な り ま す 。 


通常 音 …… 何 の オ クタ ー プ ブ も 指定 し な い 
時 に 出る 音 の 高き 


低音 < トー トート > 高音 
01 02 03 04 O5 06 07 08 


ロ 1… 口 所 こい う 記 営 を 使っ て 、 オ クン 
ター プ は いつでも 自由 に 変え る こ 
こ が で きる の 


いい か し ら ? 高 さ は 一 度 指定 し て お く と 新た 指定 し て や 


る まで は その 高 さ を 持続 し て いる みた い 。 
ゼロ じゃ な く て オー で す ヨ 


PLav""o4coscoacosc" 04 が 基準 に なか り ます 

と ん な か ん じ で ,。 一 音 ご ど と に オク ター ブ を か えた り も で きち 
ゃ いま す 。 

PLAY" OJA" 


と の 音 の 波長 は 440Hz (ヘル ツ ) に な る そう で す 。 オー ケ 
スト ラ が 音 を 合わ せる 時 な ん か に 使う 音 な ん で すっ て 。 ギタ ー 


な ら ば 第 5 弦 ベイ オリ ン な ら 下 か ら 2 番 目 の 弦 の 音 だ そう で , 


みん な と の 音 に あわ せる みた いで す 。 
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ERORE (MSS 
BHORCEO~SECOMST 
TURUSXUS/ 


高 さ の 指定 の 次 は , 音 の 長 さ を 指定 し ます 。32 分 音符 か ら 全 
音符 まで を , 0 か ら 9 ま で の 数 字 で 指定 する ん で す ネ (KR 
を つけ る と 休 待 の 長 さ に な り ま す )。 


j 32 分 休 待 16 分 休 待 qnsiemdoy YB Y ER 8 分 休 符 


Ne Dora —Qyesesm 小 8 分 音符 — J) 付 点 8 分 音符 
0 1 2 3 4 


4 4 分 休 待 "を 付 点 4 分 休 符 — 2 分 休 符 — 62240 c 全 休 符 


Jaxer Jasa Joset J 付 点 2 分 音符 o 全 音符 
5 6 7 8 9 


同じ 音 長 の 音符 が 続く と き は , 2 番目 の 音符 か ら は 音 長 の 指 
定 は 省略 で きま す 。 は じ め か ら 音 長 が 指定 され な いと , 4 分 音 
F (5 の 音 長 ) と みな し て 実行 し て くれ ます 。 


TEMPO 301497 


30 7IDDAT VIS CHET 
きる ん で す ヨ / 


音 長 の 指定 は や り ま し た けど , 今度 は 曲 全 体 を 早め た り , Y 
っ くり し た り で きる 命令 。 TEMPO X (X=30~7499) GF. 
TEMPO は 120 が 基準 な の で , 何 の 指 定 も し な けれ ば と の テ 
ン ポ で 演奏 し ます 。 

数 の 大 き さ に 比例 し て , テン ポ は は や く な り ま す 。7499 な ん 
T, どん な 速 さ か し ら ? 

18 TEMPO 7499 

26 PLAY "CDEFGAB" 

30 GOTO 26 

えっ ?! あま り の 速 さ に , し ば し あ然 。 でも, ど と か で 聞き 
覚え の ある 音 ね え …… o EN Et7T—BvsS-—vMA 
よう な 音 で すね 。 
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普 は 音 名 を : コ ロン で つない で 作 
る の で す 。 た だ し 巳 音 まで が 限界 な 
Dos 


さて , 最後 に も う 1 つ 便利 な と と が ある ん で す 。 TNT, + 
ン と 和音 が つく れ ち ゃ うん で すっ て 。 KEL, 3 音 と いう か , 
3 つの パー ト ま で と いう 制限 は あり ます 。 

PLAY" CSIES: G5" 

今 。 ド ミソ の 和音 が 聞こ えて ます よね 。 と これ は , と ん な 形 で 
コロ ン で つなげ ば OK 

— c, まあ と ん な 使い 方 も で きま す が , 一 番 実用 的 な の は , 
次 の よう な プロ グラ ム だ と 思い ます と よ 。 


PLAT" 92646264621 F2E4E2E4E2: 02R2C2E262C2E 


と れ は バイ エル 90 番 の 初め の 部 分 で す 。 | 

と の 曲 の よう に , 3 つま で (も ちろ ん 右手 の 部 分 の 和音 だ け 
PLAY す る と と だ っ て で きま す ) の パー ト に わか れ た 曲 を ,。 一 
小節 ぐら い ず つ PLAY させ る の に と て も 便利 で し ょ 。 

あと か ら 見 る 時 わか りや すい よう に , 一 つの スト リン グ ス は 
1 小節 , と 決め て お いた 方 が 楽 で し ょ う ね 。 


ソン ソプラノ 、 ア ルト 、 バ ス の SS 部 演奏 
C HOME SWEET HOME” 
を 実際 に 演奏 させ まし よう / 


さて , で は 何 か 知 っ て いる 曲 を コン ピュ ー タ KK 演奏 させ ちゃ 
まし ょ う 。 
n2a9J)tk? HOME SWEET HOME 


の 


LIST 

10 TEMPO 100 

20 PLAY" O6CSEGF 2RGF EGS! O4RSCLEGOSCLEGOEC 
10SGO6D1 OSB1 GF DO4B1GF" 

30 PLAY"06G7E565: 04C1EGOSC1EGOGCAOSGGERC 
104AGERC103A1" 
人 
TEC RET oq PEE IA LES 
38 kT Seas ER F6G3iO4C1EGOSC1EGO6C1 OSG 
oO6D1OSB1G 4B1GF" 

70 PLAY" 066G7E5651: 04C1EGOSC1EGO6GC1OSGGERC 
104AGERC103A1" 

BE SER n gr CHF DS ee ee eer eure 
90 PLAavV"O6C8RS: OSCLEGOSCIEGOSCLEGECO4GIE 
COSG1iE" 

Ok 

a 


(x 


れ は ソプラ ノ , アル ト の 2 部 演奏 で す ョ 。 
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IRSA ISOUINOD Ace 
DOBER 王 ロ ロフ な ん か の 組み 人 台 
わせ で 処理 / 


CHC, 音楽 関係 の 命令 は お し まい か な ? いい え , まだ あ 


m 
0 
4 

3X 


gQogogopoponomX 


885O00- JOH COPOPAT- 
AC COCOCOCOCOCOCOCO 
MANANNAN 
DONDE 
OOOO" 
ビビ ビビ ビュ 5OG) 


バー ン と いう GUN SHOT の 音 が 聴 と こえ た で し ょ 。 SOUND 
と いう 命令 を つか っ て , いろ いろ な 音 が つく れる みた いで す ネ 。 

例え ば SL 機関 車 の シュ シュ と いう 音 と か , パト カー の ピー 
ポー ピー ポー と いう 音 と か ね 。 

と の プロ グラ ム は , 実は と て も 難 か し いん だ けど ,。 な る べく 
わか りや すく 説明 し まし ょ う ね 。 

8017 ¿9807 と か , と れ は 一 体 何かと 言う と , 8 進数 の 表 
示 な ん で す 。 807 は 10 進 法 の 7, € 017 は 15 で す 。 1 の 位 は 7 
まで で 8 に な っ て ひと けた あがる と いう , あの 考え 方 。 2 進数 
も 出 て き て いる か ら 分 か り ま す よ ね 。 

結局 , SOUND の あと に 数 字 を 2 つっ 指定 し て ある わけ で す 。 
最初 が アド レス , も う 1 つ が デー タ と な る そう な ん で す が , と 
の 2 っ つ を 指定 し な いと 。 コン ピュ ー タ か ら 音 は 出 て きま せん 。 

& O17 その も の が 何 を 意味 する か と いう と HuBASIC OHO 
機械 語 と いう の が 分 か ら な いと いけ な いん で すっ て 。 音 を 作る 
の っ て けっ と う 大 変 な ん で す よ 。 


y 9 

SEP | だ | | 
mom 
E L4 11, 
Y ln 111 ]] 
Cay 7 
EN | ins 


| T— 


y | 
‘AP 
A LE TL TLLA] 
Y ||1|llllllllllll. 


EM | | | | UV | | T [T LT LGu-LdarbTuvoqpqTq Toy 1 | B 


HuBASIC の 特徴 の 中 で も , 特に メリ ッ ト が 大 きい の が ゲラ 
249285985 A/Cd, (73) 

簡単 な プロ グラ ム で , 多彩 な 表示 が 実現 で きた り , 色 の 変更 
を 有 瞬時 (に 行う こと こと が で きた り と , と て も お も し ろ そ う 。 ま ず , A 
マン ドド (命令 の と と ) を ひと つ ず つ 見 て 行き まし ょ う 。 


ツーン と し いう よう に 、 香 写 を 各色 に 
WMSESOAPALET 30) 
cs 

グラ フィ ッ ク で は , 大 変 重要 な 命令 らし い PALET か らい き 
ま しょう 。 一 体 ど ん な 命令 な の か な ? 


"T 


プラ ッ ク プルー レッド マゼンタ グリ ー ン シア ン イエ ロー ホワ イト 


チ 画 面 に の 


有効 な 命 


J 
の 
g グラ フィ ッ ク 
ラフ ィ ッ ク 画 面 の 


- E 
` E 
N ` 
A UN 
En x +t 
Ze ト 。SQ 
NE NOE 
MES z See 
vet Ll と エ と ss 2 
hee BH ORAL mM 
nar 所 の コミ の ヒビ 
€ OOOD 
Nu NODOTOAA 


TEXT 
画面 


TEXT 画 面 に の み 
『 効 な 命令 


( P.189 の カラ ー 写 真 参照 ) 


EF, 0~7 まで 番号 を ふっ た 7 枚 の スラ イド が ある と 考え 
て くだ さい 。 0 番 は 黒 , 1 番 は 青 と いう よう に , 番号 に より 色 
が つい て いま す 。 今 , 7 枚 の スラ イド に だ 同じ よう に 光 が 投 影 さ 
和 れ て ゆる と し まし ょ う 。 


紀 番 の スラ イド は ブリ ー ン だ か ら 、 
紀 番 の 本 負 を 写 え てこ や る こ 、 図 形 は 
線 包 に … 


PALET 4 

た と えば , と ん な 命令 を し た と する と , 4 番 の スラ イド を 選 
ん だ と と に な り ま す 。 4 番 は グリ ー ン で すか ら , 何 か 描 か せる 
令 (ちあ と で や り ま すか ら ね ノ ) を 与え て や れ ば , すべ て グリ 
ー ン で 描い て くれ る わけ で す 。 (1774) 

同様 に 。 PALET 1 な ら ば ブル ー で , PALET 6 な ら ば 
ー で 描い て くれ る , と いう の は わか る で し ょ 。 では, CAKE 
令 だ っ た ら ど うす る ん で し ょ うか 。 


I UI BSO-TID-—*€Anc 
お し いい て 、 あこ で ] 番 の フルー に 入れ 
換え も 自由 


PALET 6, 1 

困っ た な あ 。 何 色 に な る の か し ら ?9 さて , と と が と の 命令 
の 一 番 肝心 な と と ろ ノ さっ き の ス ライ ド の 説明 を 思い 出し て 
くだ さい ネ 。 

スラ イド は , さ し 換 えも 可能 で す 。 と の 場合 , 最初 は 6 番 , 
つま り イ エロ ー の スラ イド を 入れ て お いた の を , 後 で 1 番 の ブ 
ルー と 入れ 換え て し まっ た と 考え れ ば いい ん で す 。 

結果 と し て は , 今 ま で イエ ロー で 描か れ て いた も の が , すべ 
て ブル ー に な っ ちゃ うわ け で す 。 

と れ が カラ ー パ レッ ト を 変更 する と いう 事 。 大変 便利 な ん で 


LAE od 


74 

PALET パレ ッ ト 

だ れ も が パレット と いう 言葉 を 使っ 
た こと が ある と 思い ます が 、 い か が で 
し ょ うか 。 そ う で す 。 水彩画 を 描く 時 
に 使う あの パレ ッ ト な の で す 。 絵 の 具 
を 混ぜ 合わ せ て 色 を つく る 板 の こ と で 
すね 。 

し か し 、 光 に は 赤 、 緑 、 青 の 三 つ の 
SOR LDMELVOTHT, 2043503 
原色 と 言う の で す が 、 こ の 三 つ の 色 を 
混ぜ 合わ せ て 色々 な 色 を 作り 出 き な け 
れ ば な り ま せん 。 

X 1 に は この 三 つ の グラ フィ ッ ク メ 
モリ ー が あり ます 。 


ラフ ィ ッ ク 2 
R 
Li 


この 混ぜ 合わ せ を 指定 する 命令 が ッ パ 
レッ ト 命 令 な の で す 。 
PALET Q7 ave 
パレ ッ ト コ ー ド カラ ー コ ー ド 
PALET コー ド COLOR コー ド 
も プ ブラック 0 黒 プラ ッ ク 
プ ブルー 1 $ ブル ー 
|: レッ ド 2 赤 レッ ド 
た マゼンダ 3 X oc マゼンダ 
グリ ー ン 4 & グリ ー ン 
水色 シア ン 5 水色 シア ン 
黄 イエ ロー 6 KH イエ ロー 
A ホワ イト = ホワ イト 


0 
1 
2 
3 
4 
5 
6 
7 


パレ ッ ト の 各色 に 、 カ ラー を それ ぞ れ 
混ぜ 合わ せ て 色 を 構成 し て いく の で す 。 
COLOR @v7,8~7 
ーー ニー ニー 
表示 色 背景 色 
廊 字 の 色 と 背 景 の 色 を 指定 する 命令 
で す 。 電 源 投 入 時 は 、 自 動 的 に COL 
O R 7, OGCEIXB, RIA) Ce 
ッ ト る れ て いま す 。 グ ラフ ィ ッ ク 画 面 
に お いて 、 パ パパ レット コー ド を 省略 する 
と 、COLOR 文 の 表示 色 の コード の 
値 が 、 パ レッ トコ ー ド の 値 と し て 使用 
anit. 
グラ フィ ッ ク モ ー ド を 使用 す る 時 は 、 
PALET の み 指 定 し 、 パ レッ トコ ー 
ド 、 カ ラー コー ド を 省略 する と 、CO 
LOR 命 令 の 色 の み で 実行 し て くれ ま 
d 
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す よ 。 

今 ま で は ブル ー で 描い た 図 を , 色 だ け レ ッ ド 変え る な ん て 
事 は で き な か っ た か ら , いち いち 命令 を 書き 直し て た ん で すっ 
To 偉大 な 命令 で し ょ 。 

どちら の 色 が , どちら の 色 に と っ て 換わる か は , 間違え な い 
よう に 。 右 に 書か れ た 番号 の 色 の 方 が 影響 力 が ある わけ な の で , 
6 番 は , 全部 1 番 の 色 に か わっ て し まう ん で す ョ ヨ 。 


"A = B( ブ ルー) R(LyF) G( グ リー ン ) 
0 Feu? 0 0 0 
1 7 e 1 0 0 
2 レッ F 0 1 0 
3 uw 1 1 0 
4 グダグダ リー シ ジ 0 0 1 
5 owy y 1 0 1 
6 xs 0 1 1 
T ホワ イト 1 1 1 


0 と か 1 が ご ど ご ちゃ ご ど ち ゃ 並ん で ます が , て の 表 は 何で し ょ う 。 

と の 表 は , 0~7 番 ま で の 色 の 構成 を 示し て いま す 。 各 色 は , 
R(Red) G (Green) B(Blue) の 3 色 を , いか に 使う か に より 
構成 され て いる わけ な ん で す ネ 。 と の 3 色 が 光 の 3 原色 で す 。 

表 の 見 方 な ん で す が , その 人 色 を 使っ て いる 場合 は 1 使っ て 
な い 場 合 は 0 と いう 2 進 法 で 表わし て あり ます 。 では, ちょ っ 
と 実際 に 見 て み ま し ょ うか 。 

4%0 Green it, G が 1 で , B,R は 0 で し ょ 。 

5 番 の シア ン は どん な 色 か し ら 。 青 と 緑 が 1 だから, 青 緑 と 
いっ た か ん じ の 色 な ん で し ょ う ね 。 

0 番 の BLACK ゃ 7 番 の WHITE と いう と …… a BOLLS 
に , 全て 0 の 状態 で 黒 , 全て 1 の 状態 で 白 で す 。 光 の 3 原色 を 
まぜ る と 円 に な る っ て いう の を 習っ た 事 が ある で し ょ う 。 

グラ フィ ッ ク に 使わ れ て いる 色 は , こと ん な 構成 に な っ て いる 


事 も 頭 の すみ に 入れ て お いて くだ さい ネ 。 


スク リー ン 図 を 想定 し てこ 、 イ ン や 
アウ ト の モー ド を 使い 分 ける の が 
SCREENSS 


次 は スク リー ン 命 令 で す 。 と これ も PALET に 劣ら ず 重 要 。 X 
する に スク リー ン を 指定 する 命令 な ん で す が , 指定 の 方 法 は ? 
(175) 


ESPERE ASES E. PITA 


75 
SCREEN スク リー ン 命 令 
SCREEN 出力 ペー ジ , 入力 ペー ジ , 

グラ フィ ッ ク モ ー ド 
出力 ペ メージ ……0 か 1 (0 の 時 ペー 

ジ 0, 1 の 時 ペー ジ 
1 を 指定 し ます ) 
入力 ペー ジ ……0 か 1 (0 の 時 ペー 
Z0, 1 の 時 ペー ジ 
1 を 指定 し ます ) 
グラ フィ ッ ク モ ー ド …0., 1, 2, 3 
0 … 指 定 さ きれ た パレ ッ ト 番 号 で 実行 
され ます 。 
1… グ ラフ ィ ッ ク 1 ( 青 ) の み 実 行き 
れ ま す 。 
2 … グ ラフ ィ ッ ク 2 ( 赤 ) の み 実 行き 
れ ま す 。 
3 … グ ラフ ィ ッ ク 3 ( 緑 ) の み 実 行き 
れ ま す 。 


と ん な 形 を と る そう で す 。 でも, と これ じ ゃ 何 の 事 や ら さ っ ぱ 
り わ か ら な いわ よね え 。 


出力 ・ 入 力 の ペー ジ と は 、40 文 字 モ 
ー ド の 時 の み 有 効 で 、0 と 1 の 2 ペー 
ジ の うち 、 ど ちら を 表示 し て 、 ど ちら 
に 書き 込む か 指定 する も の で す 。 
次 入 カ ペー ジ と は 、 画面 制御 命令 や 

PRINT、 INPUT 命 令 等 が 実行 き 

れる ペー ジ で す 。 

REJAS bid, 実際 画面 に 出力 き 
れ て いる ペー ジ の こと を いい ます 。 
次 グラ フィ ッ ク モ ー ド と は 、 3 枚 の グ 
ラフ ィ ッ ク 画 面 の 使用 モー ド で す 。 


さて , この 図 が これ か ら の POINT に な り ま すか ら ネ ノン ジン と 
れ を SCREEN 図 と 名 づけ て お きま し ょ う 。 
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アウ ト に ・ モ ー ド は ばば 実際 に 見 える 画 
面 を 指定 する MO ロロ DE で 、 ペー ジ 
と ] ペ ー ジ が ある の 

アウ ト ・ モ ー ド は , 実際 に 目 に 見 える 画面 を 指定 する 部 分 で 
す 。 画面 に は , 0 ペー ジ と 1 ペー ジ の 2 枚 が ある と 考え て くだ 
さい ね 。 SCREEN 図 の 上 の 方 に 書い て ある 0 と 1 が だ が ページ 数 
T4. 

ディ スプ レイ に 現われ る 画面 は , 1 枚 分 だ け で すか ら , アウ 
ト ・ モ ー ド の 図 の 中 に 0 か 1 の どちら か を 入れ て , ペー ジ を 指 
定 す る 必要 が ある わけ で す ネ 。 

Chii, 目 に 見 える (ディ スプ レイ た に 現われる) 画面 の 指定 
で あっ て , 何 か 書 き 込 む 画面 と は , また 違い ます か ら 気 を つけ 
て 。 

た だ 。 と と まで の 語 は すべ て で 40 文字 モー ド で の 事 。 モ ー ド 区 
つい て は 覚え て る で し ょ ? WIDTH80 と する と , モー ド が 80 
文字 に 切り 換 わ っ て , 違っ て きち ゃ うん で す よ 。 

80 文 字 モ ー ド と いう 事 は , 1 画面 に 40 文 字 モ ー ド の 倍 の 文字 
夫人 る と いう 事 で し ょ 。 だ か ら 。 0 ペー ジジ と 1 ペー ジ に 益 け て 


.- 書 か れ て いた 内 容 は ,。 0 ペー ジ 目 に すべ て 収まっ ちゃ う 事 に な 


り ま す よ ね 。 

ペー ジ が 2 枚 使え る の は 40 文 字 モ ー ド の 場合 で , 80 文 字 モ ー 
ド に な る と , アウ ト ・ モ ー ド に し ろ , イン ・ モ ー ド に し ろ る 1 枚 
目 。 つ まり 0 ペー ジ し か な い の だ と いう 事 で す 。 わ か っ た か し 
[MM 


イン . モ ー ド は 書き 込む 画 厨 の 指定 。 
アウ ト の 画 大 と 一宮 を 治 わ せる こ 
TUNI ERAS 


次 に イン ・ モ ー ド に は , 何 か 書 き 込 む 面 の 指定 に な り ま す 。 $, 


ディ スプ レイ に は 0 ページ が 出 て る と し ます よね 。 と の 時 , M 
然 ア ウト * モード は 0 な っ て いま す 。 

と と で , イン ・ モ ー ド も 0 に し て や れ ば , プリ ント する 内 容 
は その まま 表示 され 目 に 見 えま す よ ね 。 

と ところが, 目 に 見 えて な い 画 面 , つま り 1 ペー ジ 目 に 書き 込 
ん で いく と と も 可能 な ん で す 。 

ディ スプ レイ に は 出 て と な く て も , ] ペー ジ 目 に は きち ん と 
プロ グラ ム が 打ち と まれ て いま す 。 

SH, アウ ト ・ モ ー ド を 1 に し て みて くだ さい 。 ディ スプ レ 
イ に は , プロ グラ ム が 現われ ます よ 。 今 説明 し た と と ろ を , 7 
ラフ ィ ッ クモ ー ド を 無視 し て 考え る と …… o 


SCREEN 0,1,0 


ディ スプ レイ に は 現われ 
ませ ん が 、 こ う 打 っ て い 
る の で す 。 


( P.189 の カラ ー 写 真 参照 ) 


ーー 


iba! 
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グラ フィ ッ ク ・ モ ー ド は ほ は 、 対 応 す る 
SSSABEJOCIECENES 
SZ 

3 つめ の 指定 は , グラ フィ ッ ク ・ モ ー ド で す 。 と の 3 つの モ 


ー ド が わか っ て な いと , SCREEN 命令 は 完璧 と は 言え な い の 
で す 。 さあ, また あの SCREEN 図 へ 戻り まし ょ う 。 


今度 は , CD TEXT, B RG の 4 面 が 問題 に な っ て きま す 。 

0 ペー ジ 目 , 1 ペー ジ 目 両 ペ ー ジ に つい て ,。 と の 4 枚 の 画面 
が 使え る と 考え て くだ さい 。 

ET, ふつ うに 文字 を プリ ント する 場合 は , TEXT 画面 が 使 
われ ます 。 と の 場合 は 。 グラ フィ ッ ク ・ モ ー ド は 関係 が な い の 
T, 特に 指定 は いり ませ ん 。 グ ラフ ィ ッ ク ・ モ ー ド の 図 の 中 に , 
1 と 人 人 れ て み ま し ょ う ね 。 1 は B の 画面 な の で す 。 

B は Blue の B, もう 想像 は つく で し ょ う が , 1 と 指定 し て 
お く と , グラ フィ ッ ク 命 令 の 実行 は 全部 青 で 行わ れ ま す 。 

同様 に 2 は Red, 3 は Green で ある 事 は , わか る で し ょ 。 

と の 場合 、 ひ と つの 画面 で 行わ れる グラ フィ ッ ク は すべ て そ 
の 色 に な る わけ で , 他 の 色 の 影響 は 一 切 う け ま せん 。 

黄色 で 線 を ひき な さい と いう 命令 を 与え て も , グ ラフ ィ ッ ク * 
モー ド が 1 な ら ば , 全部 Blue と な っ て し まう と いう 事 で す 。 

以上 3 つの モー ド で , 構成 され た 命令 が スク リー ン で す 。 A 
クリ ー ン 指定 は , グラ フィ ッ ク で は いつ で も る 重要 な ん で す ョ 。 


(P.189 の カラ ー 写 真 参照 ) 


B, R,G と も 他 の 色 に 影響 を 与え ない の で , と うい うふ う K 出 
て くる わけ で す 。 


ロー ピ は RG 日 全 て の 国 厨 を 消せ 
ご トラ 症 妥結 ご 
は 、 ご れ か の 包 が 消去 


次 に CLS0 っ て 何だ か わか る か し ら ? と れ は , B, RG すべ 


て の 画面 を 消せ と いう 命令 で す 。CLS だ と テキ スト 画面 の み が 


A, CLSI—CLS3 は それ ぞ れ B,R,G の 画面 の み が 消 える 
わけ 。 CLS 4 は 何だ と 思い ます か とれ は テキ スト 画面 と B, 
R G の 全て を 消し ちゃ うん で すね 。 


76 

ドッ ト の コン トロ ー ル 
PSET PRESET 

ポイ ント セッ ト ポイ ント リセ ッ ト 
グラ フィ ッ ク 画 面 に ドッ ト ( 点 ) を 描い 
た り 、 消 し た りす る 命令 で す 。 
PSET( x,y, pp) 
水平 位置 一 人 

垂直 位置 

パレ ッ ト コ ー ド を 省略 する と 、 そ の 
前 に COLOR コマ ンド で 指定 し た 表示 
色 に な り ま す 。 

グラ フィ ッ ク 画 面 の 座標 X、 YOS 
を 、 指 定 の パレ ッ ト 番 号 で セッ ト し ま 
す 。 マ ル チ 画 面 モ ー ド の 時 は 、 指 定 の 
画面 の み 、 パ レッ トコ ー ド 0 な ら リ セ 
ッ ト 、 を それ 以外 な ら セ モッ ト し ます 。 
PRESET (x: Yo» pp) 

P SET と 同様 指定 きれ た 点 を 、 指 
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> 


[gov ッ ト コ ー ド で 消し ます 。 |j 


MET 


(l00,100,2) 


を 打ち な さい と し 


TE ARA! 


Sis CPALE 


&c, それ で は PSET ic i20 € 3, 

と れ は 別に 難し い 命令 じゃ な くっ て , (X,Y) og B icC HB 
で 点 を うち な さい ” と いう 命令 な ん で すっ て 。 

つま り , X,Y は その まま 双 座 標 , Y 座 標 の 位置 で あり , C 
は PALET 命令 の Color Number (0—7) が その まま あて は ま 
る わけ よね 。 ち ょ っ と や っ て みよ うか / (wT6) 


CE 


(P.189 の カラ ー 写 真 参照 ) 


ET(100.100.2) 


1350 (100, 1000 の と と ろ た 小さ な 赤い 点 が うた れ ま し た 。 


と ん な 風 に な る の ね え ノ 


PREBETISPSET と 対 に 使っ 


[a 指定 し た 点 を 消す 義 到 な の 。 = l 


だ し 指定 の 色 で … 


PSET は 点 を 指定 する 命令 で し た よね 。 PSET EMICL THE 
えな きゃ な ら な い の が , と の PRESET, 想像 が つく ん じゃ な 
いか な ? 

そう ノ と こと れ は 指定 し た 点 を 消す 命令 な の で す 。 た だ し , 指定 
し た 色 で 消す と いう 所 が POINT。 

例え ば PSET (100, 100, 2 と し た な ら ば , 必ず PRESET 
(100, 100, 2 と し な きゃ だ め な の で す 。 と れ を 2 の か わり に 
他 の 色 番 号 に する と , お か し な 事 に な っ ちゃ うん で す よ 。 

わか りや すい 例 で いく と , た と えば 黄色 で 指定 し た 点 を , K 
で 消 そ うす と し た さよ する で し ke 

そう する と , な ん と 赤い 点 に な っ ちゃ う ワ ケ 。 と の あたり の 
原理 は 。 さっ き の PALET と まっ た く 〈 く 同じ な ん で す ネ 。 


青 赤 緑 
6 Z 0 1 1 ここ で は 引き 算 に な っ て い 
4 tk 0 0 1 る ん で す 。 分 か る か し ら ? 
2 $ 0 1 0 


と の よう に すれ ば わか る で し ょ ? 

DED, 6 を 4 で 消し て も , 4 の 色 の み 消 すわ け だ か ら , HK 
の 部 分 の 1 は 依然 と し て その まま で あり , 結果 と し て 赤 に な っ 
ちゃ うわ け で す 。 お も し ろ い で し ょ 。 

まあ , 点 の 色 を 変え た た いな ど と いう 時 に は , 今 の 考え 方 を 応 
用 すれ ば いい わけ よ ネ 。 

ST, で は と の 辺 で 。 グラ フィ ッ ク の プロ グラ ム を 書い て み 
た い の で す が , 大 丈夫 か し ら ? まあ , 先生 も つい て いる 事 だ 
し , 挑戦 し て み ま し ょ う 。 
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点 を RIND に 打つ こと 、 画 名 し いつ ぱ しい 
に プ 色 の 点 が バラ バラ に 1 レレ 個 
玩 / 


CLSOF (4 OM * 
消す こと 。 

な ぜ O 画 面 を 消し た TB. CREEN_B,5,6:CLS B:PALET 

か と いう と 、 ま だ 20 $8 KRND て 1)』 =RND#* 200: C INT (RND#7) +4 
番 以降 に プロ グラ ム X> Y> € 
が 続く か ら で す よ 


0 か ら 6 まで で す が 、 
0 は 黒 で 画面 と 同色 
で 見 えな い の で 1 足 
<etti=TEL 
ます 


ST, と の プロ グラ ム を 実行 させ れ ば , 画面 一 杯 に 7 色 の 点 
が めちゃ くち ゃ た だ 1001 個 うた れる は ず な ん で す よ ね 。 ど うか 
な あ ? マ ちょ っ と 心配 o 


( P.189 の カラ ー 写 真 参照 ) 


どう や ら 成 功 の よう で す よ 。 も う 一 回 プア ログ ラム を 見 て み ま 
La Bi 

Hn? LIST し た ら 自 然 に グラ フィ ッ ク 画 面 が 消え た ワ ノ 

そう な ん で す 。L. す る と と で 上 自動 的 に 画面 が きり か わる ん 


で す 。 
じゃ あ , 再度 ゲ グラフィック 画面 を 見 る 時 は どう し た らい いん 
ELS うか 。 
Sc.80.,80.8 
Ok 
a 


と ん な 風 に , 再度 命令 を 与え て や れ ば いい わけ で すね 。 
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77 
画面 に 線 を 引い た り 、 逢 を 描い た り 
する 時 は 、PSET で 1 点 ず つ 指 定 し て 
も 良い の で す が 、 そ れ は 大 変 な 作業 に 
な っ て し まい ます 。 を そん な 時 に 、 
LINE 命令 て 解決 
LINECX1; Y15-(M2. V2); 
PSET,C 
xi と yi の 位置 を 出発 点 と し て 、xz E y2 
の 位置 を 終点 と し た 線 を 、C て 指定 き 
れ た 色 で 引く 。 
LINECX1,Y12-CX2. "25; 
PSET, CB 
xi と yi の 位置 と 、 xz と yz の 位置 を 対 
角 線 と し た 箱 を 、 C で 指定 され た 色 で 
引く 。 
LINECXK1,715-CX2, 72); 
PSET , C; BF 
xi と yi の 位置 と 、xz と yz の 位置 を 対 
角 線 と し た 箱 を 、C で 指定 され た 色 で 
ぬり つぶ す 。 
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LIN は " 線 を 引く <” と いう 命令 。 引 
き 始 めこ 引き 終わ り の 点 を 指定 し 


LINE は , その 名 の 通り “ 線 を 引く " と いう 命令 で す 。 どの 
よう に 指定 する ん で し ょ うか ? (877) 
LINE(X1, Y1) - (X2, Y2), PSET, C, PAT 


de Pe eae 


始点 パレ ッ ト ナ ン バ ー LINE の パタ ー ン 


と の よう な 指定 , モー ド と PAT( パ ター ン ) に つい て は , 5 
ょ っ と 説明 が いり ます ね え 。 

モー ド に つい て は , PSET ( 点 を うつ ) を 知っ て いれ ば ほとん 
ど 用 は 足り る らし い の で す が , と の 他 に は XOR と 言っ て , 2 
回 書く と も と に 戻る モー ド な ど が ある よう で す 。 

Mier 2042, と れれ は どん な LINE 07-—v HS 
うと と で , BHORRMIL& HFFFF と いう パタ ー ン な ん で すっ 
TZ 

の 場合 は 指定 し て も , ある い は 何 も 指 定 し な く て も よい の 
ECI CT Ro 

それ 以外 の パタ ー ン と し て , 点線 と か 一 点 破線 等 , 何で も 書 

Fo JATT EZ 


0,02-(100,1005,PSET,6,&B1010101010 


[41516 
xt 


(P.189 の カラ ー 写 真 参照 ) 


と れ は (0, 0) 45 (100, 100) ま で, 黄色 で 1 コマ お き の 点 


線 が か ける ん で す よ ね 。 わか る か し ら ? 
つま り , &B の あと の 1010…… と いう の が 今 の 場合 の パタ 


ー ン で 。 1 の 時 は 点 を 打ち , 0 の 場合 は 打 た な いと いう 事 で す 。 


と の 101… が 計 16 個 (16 ビ ッ ト ) 書い て あり ます けど , 必ず と 
の よう に , 16 ビ ッ ト ま で 指定 し て くだ さい 。 


LINE 苔 琉 ご は 、 こ の よう に 複雑 な 
線 も 描け ます 。 色 を 変え こま だ ら 紹 
も で きる の 


(8, 0>-(1006, 100? 
- (200, 50) - (300, 20) 


(P.189 の カラ ー 写 真 参 照 ) 
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S&T, LINE 命令 だ と と ん な 風 に 線 を 連続 させ る と と も 可能 
で す 。 

色 な ん か 変え て みて , ラン ダム に 線 を つなげ て いっ た らき れ 
いな ん じゃ な いか な あ …… o いろ いろ 遊ん で みて くだ さい 。 © 
っ そう そう . ノ キャ ラク ター ライ ン も ひけ る ん で す 。 


巳 ロ X は 息 形 を 描く 病 到 だ け ご 、 指 
定 し た ライ ン を 対 包 線 こ する 長 万 
形 を 作り ます 


BOX と いう の は , LINE 命令 と ほぼ 同じ 。 ひ と つ だ け 違 う 
の は , パレ ッ ト ナ ン バ ー の 後に CB と 指定 する と と だ け で す 。 
する と , 指定 し た LINE を 対角線 と する 長方形 を 描い て く 
れる ん で す よ 。 


(P.190 の カラ ー 写 真 参照 ) 


わか り ま すか ? (0, 0) か ら (100, 100 € まで ひい た 線 が 対 か 
く 線 に な っ て る で し ょ 。 おもしろい 命令 だ な あ 。 


BOX FLL は BB ロ X の 中 を ぬり 
DITA, 選べ X こ と 違う 指定 の 
し 万 は 巳 が ビビ に 


次 に BOX FULL と いう の は , BOX の 中 を ぬり つぶ し て < く 


れる 命令 だ そう で す 。・ 指定 の 仕方 は BOX と ほとん ど 同 じ で , 
た だ BE BF と すれ ば OK ノ 


(P.190 の カラ ー 写 真 参照 ) 


ワッ きれ い ノ と れ で いろ いろ な 色 の BOX が いっ ぱい 描け る 
な あ 。 大 き ぎ も か えた だ たり し で て で“………" まあ 遊ん で みて くだ さい 。 


RCL ビ は 円 を 描く 病 到 で す 。 中 
心 と 半径 を 指定 する ほか 、 viste 
[ZETA 


CIRCLE は 円 を 描く 命令 で す 。 
CIRCLE(X, Y), PR. C, yix, A, B 
指定 の 仕方 は と の 通り で す 。 (m78) 


(X, Y) wes 中 心 座標 


Boo c 半径 
G REA 方 ラー ナシ ジ シッ ペー 
が MM oe 半径 の 比率 (y の x に 対す る 半径 ) 


半径 の 比率 は x 座標 の 半径 1 に 対し て y は いく つ に な る か と 
いう と と 。 つ まり きれ いな 形 の 円 ば か り じ ゃ な く て , だ 円 も か 
ける と いう わけ で す 。 

それ に 角度 の 指定 が ある っ て いう と と は , 扇形 も 自由 自在 と 


いう わけ ネ 。 と れ は , 0 度 か ら 60 度 まで 指定 し て み ま し た 。 


78 
円 を 描く 命令 
CIRCLE 


CIRCLE, Mii F » b CAP oll 
dh た め の 命令 で す 。 

中 心 (X ,Y)、 半 径 r (ドッ ト ) の 円 が 
画面 に 描 わ れ ま す 。 ゆ り ち ゃ ん の 説明 
の よう に 、 扇 平 率 を 設定 する と 、 長 軸 
が r の だ 円 を 描く (こと が で きま す 。 

また 、 初 期 角 と 終了 角 を 指定 する と 、 
その 内 角 の 弧 が 描け ます 。 円 グラ フ な 
と ど を 作製 する 時 に 役立ち ます よ 。 皆 る 
ん も 値 を 変え て 色々 な 形 を 描い て みて 


くだ きい 。 


サー クル 
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m 


多角 形 を 


79 
POLY ポー リー と 言い 、 
描く 命令 で す 。 

(x,y) を 多角 形 の 中 心 と し て 、 中 
心から 各 項 点 ま で の 距離 を r と し た 多 
角形 を 描き ます 。 頂 点 間 の 角度 や ステ 
ッ プ 角 と 呼び 、120 で 三角 形 、90 で 四角 
形 、 盗 は 144 と な り 、 こ の 角度 が 0 の 時 
は 、 中 心から 、 初 期 角 の 方 向 へ 長き r 
の 直線 を 引き ます 。 


何 も 指定 し な けれ ば 
普通 の 円 に な り ま す 


CIRCLE (328,180), 58,4 
CIRC LE (320,100),58.2,2 
BILE (320,1000,58,5,.5 
[| 


po (320,188), 70, 7,1, 8. 68 


( P.190 の カラ ー 写 真 参照 ) 


POLY こと は 読ん で 字 の こと く 有 多角 
形 、 BRICKS CSERO/NINISER 
数 ) こ し ます 


POLY と いう の は , 多角 形 を 作る 命令 。 

指定 の 仕方 は CIRCLE に 似 て る みた い …… o (179) 

POLY(X, Y), R, C, 360/N, A, B 

違う の は 360/N の と と ろだ け で し ょ ? と の N は 角 の 数 で , 
5 角形 を つく り た けれ ば 5 と すれ ば 良い わけ で す 。 わか り ま す 
よね 。 た だ , 原理 か らい く と , 0 度 の 点 か ら 何 度 お き に LINE 


bl を 引く か (360/N が その 角度 ) と いう と と に な る ん だ そう で す 。 


大 成功 ! (5 角形 を 作る の 最後 の A, B 指 定 で 0 度 ~ 720 
度 ま で 回 し て いま す ) 

次 に PAINT は 想像 通り , 指定 され た 領域 を ぬり つぶ す 命 令 。 

た だ , て と の 命令 は ぬり つぶ な す だ け の も の で すか ら , あら か じ 
め 図 形 を 描い て お いて , その 後 使う も の で すね 。 

それ じゃ , POLY の 説明 の と と ころ で 描い た 星 形 の 図形 の 中 
央 を ぬり つぶ ぷ お し て み ま す ね 。( 補 80) 


この 点 は 、 ぬ りつ ぶさ れる 内 部 の 
点 な ら 、 ど こ で も いい そう で す よ 。 
別に 図形 の 中 心 で ある 必要 は あり 
ませ ん 。 Et, HR 
色 は POLY の 指定 色 
と 同じ 色 で な けれ ば 
な り ま せん よ 。 


PAINT(¢326,106):;6:6 


E a 


境界 色 、7 色 ま で 指定 可能 


— 
ぬり つぶ す 色 


(P.190 の カラ ー 写 真 参照 ) 


と ん な 感じ で , 
っ ぷす の を や め て くれ る わけ で す よ ね 。 ずい ぶん 器用 な コン ピ 
ュー タ だ と 思い ませ ん ? 


境界 色 を 決め , その 色 に ぶつ か っ た ら , ぬり 


ーー 一 


80 

PAINT ペイ ント 命令 は 、 画 面 

の 特定 の エリ ア を 指定 し た 色 で 塗り つ 
ぶし な さい 、 と いう 命令 で す 。 

(x, y) の 点 を 塗り 始め の 点 と し て 、 

境界 [な る パレ ッ ト コ ー ド て 指定 され 

た 図形 内 を 、 指 定 の パレ ッ ト コ ー ド で 


塗り つぶ し ます 。 


177? 
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LINE (0,0) WINDOW 


-(63? 199) 


き そ て 。、 と と で お まけ が つい て くる ん で すけ ど 、BO 宛 FULL 
と か PAINT ( 後 で 出 て きま す ) な ど 。 あ る 一 定 の スペ ー ス を 
ぬり つぶ す 場 合 に ちょ っ と お も し ろ い 事 が ある ん で す 。 


HEXCHRSIs:BEG ZEN 
EUND —LcBDoSSS- 
CS 

さて 下 の プ ログ ラム を 見 て くだ さい 。 計 6 種類 の プロ グラ ム 
が , PRINT OUT され て いま す よ ね 。 

プロ グラ ム を 見 て わか る よう に , BF の 後に HEXCHR$(“ ”) 
と 書い て ある の が 分 か る で し ょ う ? 

HEXCHR $ と いう 命令 は , 指定 され た 範囲 内 を , (S) ON 


oku 
ロロ 2 


3 à 8B * 9 3 3 8 9s " m" w 
ss ee ee eee à x* ? e 
se B * + 3 3 3 3 U WW uw 
"ox 8 B5 + 9 5 3 » W w 9» x 
*" € o. +. " 9 & v E *" w" ^" 

& * * 5» c mu . Boma wo? * o3 
* 8*5 3 * 9 X W . 4 oa x» * 

w w «à » eat d s &K » à à W 
*o* * 3 3 X 4 Row os un 
e. & € ee em Hoa Hoo 5 om 
susa 3 8 9^ 85 $3 3 3 1 
w € ee 3 € $ " & w $ € 9 
see eee 5 w" + a» 9 9 
2» wo 8 . * 3 9 3 9 T v9 1 4 
ee 9» 3 * 8 ^ 9 *» » 9» $9 
*oR OS * o? B À»—9GCx ?»* 8 o» 5 
mw w w m W N " » monos 
X X & Ww x € X w € WW € * à 
ee 3 3 * 3 BH EH à 8 &ü t 
EO ^ à o- D oB Wo» m» £ Y * 
3 » un s» n8 « ag * s» 3» «s n" 
n=... 4. W à aoc 9 €* uox 
* x 9 w w ee » e W * £4 
tom s» wo E € & nee 
" u u * 4d 8 " 35 «M ^ neg 
* * € 3 3 3 X E 7 L EK i8 


puts urs hexohrit "M 


a s = = 
a d sad e 
m ? m m 
£ て E C 
£ 0 £ £ 
o x Ü fa) 
x " x x 
U で 山 山 
£ " i i 
+ r^ 中 + 
Q s o Q 
p p p や 

" T 4 Ec 

o 2 o oro 

pa sedi he he 

On CC © OD 

に e pes 100 

at 

ot 

四 十 

at 

vt 

it 

^N 

Coe 

Woe 

att 

ON 

NOJ 

w 

ud 

C 
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AA 
" 
ru 

ーー アー 


だ に 
Pn ur 
Pu a 
の の 

oe 


p 
も ちろ ん , 通常 の BOX FULL で 行わ れる と と を , HEXCHR $ 


を 使っ て も で きま す 。 全部 ぬり つぶ な し て し まう パター ン は FR 


d 
FF… で す 。 


z 


+ 
A 
44 
i. 
X 
Ü 
x 
LU 
£ 
+ 
Q 
p 


o BERZAL \ 


た 


と の プロ グラ ム で す 。 と れ は HEXCHR$ を 使っ て 


10 番 で 品 と いう 字 の パタ ー ン を 作っ て いま す 。 
4 
T 
a 


HEXCHR 員 を 使っ て 品 こ し いい 漢 


字 を 作っ て み ま し 
ます 


品 と いう 漢字 を 作っ た も の で す 。 


fot soxsx Lip 


ado oM 


180 


Y 


レク | | 
シング ジジ 


Y 


LA LA 
DIAN AZ 


7. A 
オーー イイ オオ オイ 


と の 図 を 見 て くだ さい 。 1 つの 文字 を 作る の に , と の よう に 
パタ ー ン を 決め て や ら ね ば な り ま せん 。 と の 小さ な 四角 1 つが 
1 DOT で す 。HEXCHR$ を 使う 場合 に は , 16 進 法 が 用 いら れ 
る そう で す 。( 補 81) 


キャ ラン ター を 作る 時 は を 半分 か 
ら 始め ます 。 上 自分 の 名 前 に 挑戦 


図 A 


上 ます と で SO を TE PPWE id 


キャ ラク ター を 作る 時 は , まず 左 半分 か ら 始め ます 。 8421 は 
ひと 組み と 考え て , DOT が ぬり つぶ され る 部 分 は , と の 組み 


へ キサ キャ ラク タ 
ー ダ ラー と 呼び ます が 、 我 々 は ヘッ ク 
スチ ャ ー ダ ラー と 呼ん えび で おり ま す 。 
これ は 、16 進 数 の 文字 デー タ を 文字 
列 に 変換 し ます 。 

ゆり ちゃ ん の 説明 の よう に 、16 進 数 
の 文字 列 を 最初 か ら 2 文字 ( 2 バイ ト ) 
ずつ 区 切っ て 、 る その 2 文字 に 対応 する 
キャ ラク ター に 変換 し て 文字 列 を 作っ 
て いき ます 。 こ の 文字 列 が 、 こ の 実数 
の 値 と な る の で す 。 

X 1 の オプ ショ ン と し て 漢字 ROM 
が あり ます が 、 こ の HEXCHR$ を 使 
う と 自分 で 好き な 漢字 パタ ー ン を 作る 
こと も 出来 ます よ 。 こ の 応用 例 は 巻末 
の 日 本 国 憲法 の 中 で 出 て 来 ま す 。 参 考 
に し て くだ きい 。 


181 


182 


Ceitl sORSCRDPLEL EDRs 

左上 を クロ ー ズ アッ プ し て 考え て み ま し ょ う 。 まず 図 A1 段 
目 を 見 て くだ さい 。 何 も ぬ りつ ぶし が あり ませ ん よね 。 で すか 
500, 次 の 2 段 目 初め の 4 個 は 0, その 後 の 4 個 は ぬり つぶ し , 
8+4+2+1=15=F と な る の で OF, ix, 3 段 目 と 4 段 目 も 左 
側 の 4 個 は 0 , その 後 は 8 の 所 だ け ぬ りつ ぶす わけ で , と これ は 
0808 と な り ま す 。 

10 番 の リス ト を 見 て くだ さい 。 "000F, 0808, 0808…… と 16 
組 あ り ま すね 。 上 の 様 に まず 左上 か ら 左 下 ま で 8 組 計算 し , 次 
に 右上 か ら 右 下 ま で 8 組 と 順番 に 計算 し て 行っ た の で す 。 

と れ が キャ ラク ター を 作る 手順 で す 。 め ん どう が ら ず 自分 
の 名 前 を 描い て み ま し ょ う 。 そ の た め に は 8, 4, 2, 1 の 16 進 
数 計算 を 身 に つけ て くだ さい 。 8 + 4 は C, 8+4+1 0D, 
BDTAFIBE, SrAat2r1LRRraetisete tT Eo 


POSITIONS ++2NEHOLO 
CATE に 相当 し ます 。 PATTERN 
も 一 緒 に 覚え まし よう 

SC, 説明 が 長く な り ま し た けど , 20 番 を 解説 し ます ネ 。 と 
ET, また 新しい 命令 が 2 つ 出 て きま す 。 

POSITION と は , テキ スト 画面 で いう LOCATE で す 。 書き 
出す 位置 を 指定 し て や る わけ で すね 。POSITION は グラ フィ ッ 
ク 画 面 の 時 だ け 使 い , 同様 に LOCATE は テキ スト 画面 に だ け 
使い ます 。 

次 に PATTERN は POSITION と 一 緒 に 使い ます 。20 番 を 
実行 し た も の は “ 品 ” T, 30 番 が “P” で す 。 ど うし て と ん な 
風 に な っ ちゃ っ た ん で し ょ う ? 

PATTERN -16 

PATTERN 16 

違い は , 一 が つく か つか な いか に ある よう で す ネ ! PAT- 
TERN -16 で は , POSITION で 指定 され た 点 か ら 下 へ 16 DOT, 


PATTERN 16 で は 上 へ 16 DOT 書い て いっ て くれ る ん で す 。 
書く と いう と と は , さっ きみ た よう に DOT を ぬり つぶ す と 
EC, その 順番 も キャ ラク ター の 作り 方 で 書い た 通り で す 。 
普通 は , 上 か ら 下 へ と 書い て いき ます か ら , 大 体 の 場合 は 
PATTERN -OOe&73 0 & 4 4, 


WINCOWIS 95797 VIBEN 
TURI-UZEIBIES STC. ME 
iREMNICGORS 

さて , も う 一 つ 重 要 な グラ フィ ッ ク ・ コ マン ド が あり まし た 。 


と の WINDOW i3, グラ フィ ッ ク 画 面 の 表示 エリ ア を 指定 する 
命令 で す 。 考え方 は 少し 難し いよ う で す よ 。( 屯 82) 


NM )-(639, 199), (8, 0)-(1000, 1000) 
| ine(8; 8)- (639, 1997, 


Oks 
A TA 
と の プロ グラ ム を 見 て くだ さい ね 。 (0, 0) 一 (639, 199) 
と いう の は 最初 の エリ ア の 指定 で す 。 と と の 考 え 方 は , ボッ ク 
ス と 同じ で , (0, 0), (639, 199) を 結ん だ 線 を 対角線 と し 
た 四角 形 が エリ ア と な り ま す 。 

^4, (0, 0) 一 (639, 199) を (0, 0) 一 (1000, 1000) 
と 置き 換え て み ま し ょ う … と いう の が WINDOW 命令 な ん で す 。 
普通 に 考え る と , line (0, 0) 一 (639, 199) と し た ら , 画 
面 一 杯 に 対角線 状 に 線 が ひけ る は ず な ん で す よ ね 。 そ れ が と の 
よう に な っ て し まっ た の は , (639, 199) を (1000, 1000) ^ ¡E 
き 直 し た た めで す 。 わ か る か し ら …… ? 

WINDOW 命令 は , 画面 の 縮小 や 拡大 , 反転 (座標 系 を 逆 に す 
る ) な ど に は と て も 便利 で す 。 

次 の も 見 て み ま し ょ う 。 


5 


WINDOW そう で す 、 こ の 命令 
は グラ フィ ッ ク の 窓 を 指定 する の で す 
窓 _ つ まり グラ フィ ッ ク 画 面 の 表示 
エリ ア を 設定 する 命令 で ご 、 ユ リ ち ゃ ん 
の 説明 に 補足 いた し まし ょ う 。 
WINDOW Xs, Ys)-(Xe, Ye 
>> CXL: V12-CX2, V2) 
Xs, Ys… 始 点 座標 
Xs… 水 平 座標 40 文 字 モ ー ド の 時 
0 —319 
80 文 字 モ ー ド の 時 
0 —639 
Ys: EVER 0 一 199 
Xe, Ye… 終 点 座標 
Xe… 水 平 座 标 40 文 字 モ ー ド の 時 
0 —319 
80 文 字 モ ー ド の 時 
0 —639 
Ye: HERE 0 一 199 
Xi, Yi… 始 点 の 論理 座標 
X2, Y2… 終 点 の 論理 座標 


WINDOW の Xs, Ys か ら Xe, Ye の 
位置 は 、 実 は X1, Yi? 6X2, Yz に な 
る の で す よ 、 と 設定 され る の で す 。 
WINDOW(@, B>-(319,199 
) , て 9,9)- て 319,199〉 
WINDOW の 0, 0 か ら 319, 199 は 、 実 
は 0, 0 か 6319, 199 な の で す よ 。 と す 
る と 、 こ れ は 何 の 変化 も あり ませ ん 。 
と ころ が 、 
WINDOW(@, B)-(319,199 
>),(B,0)-(639, 399) 
WINDOWO 0, 0 か ら 6319, 19914, E 
は 0, 0 か ら 639,399 な の で す よ 。 と な 
る と どう な り ま すか 。 X639 TYD? 
399。 ち ょ うど 倍 の 数 に な っ て ます ね 。 
で すか ら 、 画 面 の 左上 を 基準 に 画面 が 
以 に な っ て し まっ た の で す ;。 

0 639 


つま り 、 画 面 い っ ぱい に グラ フィ ッ 
ク を 描い て 、 こ の WINDOW を 実行 す 
る と 、 以 に 縮まっ た だ グラ フィ ッ ク を 画 
面 上 に 描い て くれ る わけ で すね 。 

この WINDOW 命令 は 、 巻 末 の 応用 
例 「 世 界 の 国々 タ 」 の 中 で 、 イ ギリ ス の 
旗 を 縮め て 、 オ ー ス トラ リア や ニュ ー 
ジー ラン ド を 作る の に 使わ れ て お り ま 
す よ 。 


183 


184 


*» c 1 


pag 0)- (699,199), (Bs 8)- (1,1 
possem 


ko 
1A 
ko 


Roeg 


line (0, 0) 一 (.5, .5) BAT, 点 み た いな 線 が 画面 の 
隅 に 表示 され る と ば か り 思 っ た ら , とこ うなり まし た 。(639,199) 
を (1, 1) と 設定 し 直し た か ら , と うな っ た ん で す よ ! 

最初 の 方 は , 理論 上 の 線 よ り も 短 か く な り , 後 の 方 は 長く な 
っ た わけ で す 。 


この 様 な 


描い て み ま し た 。 
素 晴 し い 絵 を 描 ( こ と が で きる の で す 


の プロ グラ ム 中 に PRW、CGEN 
な ど 勉 強し て いな い 命令 が 多く 出 て 来 


83 
今回 は グラ フィ ッ ク コ マン ド 
れ ら の 命令 は 巻末 の 一 覧 表 
で 勉強 し て 下さ い 。(PRW…P 246 参 


- 


照 、CGEN…P247 参 照 ) 皆 さん も X 


ST, 
を 駆使 し て クモ の 巣 を 
ます が 、 
1 HuBASIC を 勉強 する と 、 


(それ で は 、 グ ラフ ィ ッ ク 命 令 の 
応用 と し て くも の 上 巣 を 描い て み ま 
し ょ う 。 こ の くも は 動き ます よ ) 


くも の 巣 へ の 応用 


DL a O 

に ~~~ すす 
<= l= (Ms = 
MONDJON 


Y 


20,14: 
js LOCA 


: 
| 
IN 
R 
IS 
S 
& 


SILOCATE XX 


DOHADUOLQOT 

= 0: O: Ds: OU 

~~ IS PT iw DEPT cx E 
^ E Qc coo DD 
z x IOGICGTCOIGZ 
A Lu いい 
< Z A Mic iie dE E 
= = = an WILL Lu CO LU CO LU 

ーー WE oo on (X) エー エレ IGI: 
z ln 
a 


: LOCATE 
::LOCRTE X>Y+1:PR 


Y:iPRINT"12" 
‘QS 
a 
aea 
a 
T 
a 
4 
a 


4:35 
Sx= 
3:5 
¿SY= 
N 
:YY= 


a 
á 
P 


Il E- HH CO FE Co IE OO IN 

X Tu KTH ^C). LL o Tu. 

oe TZ Z > XM A C0 Cox FC) 

XL I a LZ an ens AN ADWIMAIN OC) 

X + エロ エロ -= HO +IMIN~IOINI 

"= テー エー エズ -Ze I Gli mod oo 

M. dil E FX xo 2000)“ 

AX lat m = COO. RARA OA DA 

dex sr |l Se MOTO WA 1 avro ro 0 OO Z- 
I T= + XAYA m + エエ NI エ OT エコ I エ OI 
エー トー ruerEmeermxxo2-rzdq. o Da 
FO x ZZ2TMOT=: H+ Ce] + 0r mA d a cb ob Ale 
AHLU «WO: exp un xb bb bi oco» OL Lic Lr LL 
eS OZODKDOr OMX Hn J «LOO OQUO-«ACOOOLb AY 
ZIL. SHEER IE da x A 

2 & M E ro COCOCOCULL CO00COCO COCOCO CO 
DOMA "DOTO Z- COCOCO ACC SE + ALND ONAOL AONA 
kJ に O0 Co TALON- HON aH AAA ONION 


TO 12:PoL'"i(168,1080»5,200.7.0,.I 
013: POLY(¿160,100>),1*x10,7,30, 


40: SCREEN 0; 8; 8: PRLET: PRW! CLS4:6 
20) 132 PRINT"12": 
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出し 、 し PRINT は ブリ ンタ に 
PRINT OUT し て くれ ます 


mit, プリ ンタ 関す る 命令 を 覚え て お きま し ょ う ね 。 
OLLIST 

プリ ンタ ー に LIST を 打ち 出し て くれ ます 。 画面 に は LIST 
は 出 ま せん 。 
OLPRINT 

プリ ンタ ー に を PRINT OUT し て くれ ます 。 とれ も 画面 に は , 
何 も 表 示さ れ ま せん 。 


11 ist 
18 PRINT "Yuri " 
24 PRINT "Shinagawa” 


H DUPY は 文字 だ け の 画面 に 書 
か れ た だ た ここ を 全て プリ ント アウ ト 
し て くれ ます 


18 print "Yuri " 

20 print Shinagawa 
Fun. 

Turi 

Shinagawa 


hcopy 


OHCOPY (ハー ド ・ コ ピー) 
@HCOPY TEXT 画面 , つま り 文 字 だ け の 画面 に 書か れ た 事 を 
す ペ で プリ ント デ ウ ト し て くれ ます 。 
QHCOPYO グラ フィ ッ ク ・ コ マン ド の 中 の スク リー ン 命 令 で 
も 触れ まし た が , グラ フィ ッ ク ・ モ ー ド で は , TEXT 画面 , B, 
R, G の 4 画面 が あり ます 。 と の うち の B, R, G 3 枚 の 画面 
と も , 重ね て 一 つの 画面 と し て , コピ ー が と れる の が , cod 
令 。 ディ スプ レイ 上 に は , 黒 を 除い た すべ て の 色 (7 色 ) OH 
CHET. 
③HCOPY1 B (Blue) の 画面 の み の 表示 と な り ま す 。 で すか 
ら , B を 構成 要素 と し て 持つ 色 し か 現われ て きま せん 。 
@HCOPY2 R (Red) の 考え 方 は hcopy 1 と 同じ で す 。 

(5 HCOPY3 G (Green) の 考え 方 も hcopy 1 と 同じ で す 。 
⑥HCOPY4 さて , と これ は TEXT 画面 と B R, G3 枚 の グラ 
フィ ッ ク 画 面 を 合わ せ た , 計 4 枚 の 画面 を 合わ せ て 表示 し , 7 
リン ター に Print out する 命令 で す 。 

① て ⑥⑥ ま で 順番 に プリ ント アウ ト し て あり ます か ら , ATA 
て くだ さい キネ ! 
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T © 


9) - (40ki +20; 400, PSET 。 i» bf 


JOTFO RAIN 
OX CK OOOO: 
* 
bo 
mo 
w- 


E 84 ] O 


グラ フィ ッ ク 命 令 の まとめ 
SCREEN (GRAPH) 
この 命令 は 、 グ ラフ ィ ッ ク 画 面 を 使 
用 する た め に 必ず 使わ れる 命令 で す 。 
の 命令 の 使い 方 を 間違い ます と 、 画 


面 が 見 えな く な っ た 5 り 、LISTs 取 
れ な く な り ま す 。 そ ん な 時 の 唯一 の 救 
助 策 を 知っ て 置い て 下さ い 。 


[cTRL] + [D] (a7 & »—vD) 


この 命令 を 実行 する こと に よっ て 、 (3) 


な ん と 14 個 も の 命令 すべ て が 時 時 に 実 
行 る され 、 も と の 画面 に 戻っ て し まい i 
す 。 (P253 参 照 ) 

SCREEN 命 令 の 出力 ペー ジ 、 入 
力 ペー ジ の 指定 は 、40 文 字 モ ー ド の 時 


の み に 有 効 で 、80 文 字 モ ー ド の 時 は 入 
出力 が 同一 画面 し な り ま す 。 

COLOR と PALET の 再 確 略 

カラ ー コ ー ド 0 一 7 と パレ ッ ト コ ー 
F ド 0 一 7 は どちら も 同じ や な いで すか 、 
と 初め ゆ は ゆり ちゃ ん も 考え て い だ た よう 
で す が 、 こ れ は 
全く 《 別 の も の な ん で す よ 。 

COLR 命 令 で は 、 画 面 の 文字 の 色 
と 背景 の 色 を 変え る 命令 で し た ね 。 

COLOR は HuBASIC 起 動 時 や 、 
PALET 命 令 を 使用 し な い 時 は … 

COLOR コ ー ド = テ PALET コ ー ド 
と な り 、 指 定 通 り の COLOR て 変化 
し て 《 れ ます 。 つ まり 全部 の 色 が 使え 
る 状態 な ん で すね 。 

し か し 、PALET 命 令 で キャ ラク 
ター、 つ まり 文字 や 背景 の 色 を 変化 る 
薄 る こと は で きま せん 。 た だ だ し 、 LI 
NE. LIRCLE, POLY?;EO 
グラ フィ イッ ク 命令 を 使用 し 、COLOR 
コー ド を 変化 きせ な いで 、 色 に 変化 を 


与え を る こと は で きる の で す 。 要する に list 

グラ フィ ッ ク 画 面 で の み 、 こ の PAL ið PA 

ET 命令 が 使え る の で す 。 28 Fo =ø 

LINE (0, 0)— (319, 199), PSET. 2 30 LI C1 十 
PALET ュ ー ド ーーーーー マ 40 NE i 

と ダイ レク トモ ー ド で 実行 し て みて 〈 Ok 

だ さき るい 。 画 面 の 左上 か ら 右 下 ま で 赤い run 

線 が 描 わ れ ま し た ね 。 そ れ で は PAL Ok 

FE T で 色 を 変化 きせ て み ま し ょ う 。 hcopu 4 


PALET2.1 
PALET コ ュー ド の 2 (4) を 1 ( 青 ) に 
変化 きせ な る いと 命令 する と 、 ほ ら 明 
時 に 青く な っ て し まっ た で し ょ う 。 
次 に 先ほど の …… 


CTRL. + D 


と 打っ て みて 〈《 だ さい 。 赤 に 逆 も どり 
| 初期 状態 に も どっ て し まっ た の で す 。 
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— || 


N 


0 ページ か ら 1 ペー ジ に 移す と 、 実 は こん な こと か 書き 込ま れ て いま す 


screen 
screen 


"a; 


A m". 


HuBASIC の PALET 機 能 、PALET ナ ン バ ー に 合わ せ て 、 そ れ ぞ れ フ ラッ ク 、 ブ ルー、 by Fy 
レッ ド 、 マ ゼン タ 、 グ リー ン 、 シ アン 、 イ エロ ー、 ホ ワイ ト の 8 色 表 示 が て きま す 


R、G.B 三 原色 を ティ スプ レイ て 表示 する と 、 
この よう に な り ま す 。 


| q ia 
i E . o. * ご ° . e us 
2 LES x a by ¿ : " 2 p E LI - hd 
F LI Jd E LI . 6 a T | 
. の oe en T Sr à .. Tg - ° 
EN To E Mr MER E PSET て 赤い 点 を X Y 座 標 上 に 表示 
. " = p ` - d E E ue i 
te . . . E J P . " / 
e LJ > LI o LJ LJ | 
i . . a » 2 る : er A A $9: © - (100. 106). PSET. 6. 401010101010 
SA . Uer IS m i e a » E ^ > | RR 
nm " oF E e e Le du. 
= " ‘ i: x o © . a . P .. - s. dn 
eS . i . os a E tv = E 2 9 o 
d 2 e » EIE e. LINE 命 令 て 破線 を 描き ます 
. > 8 ae R *. .. " 5 
T E . CIE LINT VT EE | WW NEN EIE eain 
E > " * | BREE ee 
に "P 


ラン ダム に 点 を 表示 させ ます 
anu’ RS - = on 


LINECOe. 05-100, 100>,PSET,6,BF 
Id 


get 0»-C100,1005,.PSET.B 


( 
e 


BOX か ら BOXFULL に 指定 を 変え る と 、 こ 
な 風 に 美しく ぬり つぶ し て くれ ます 


P dias 
| ROLE (328,189), 58,4 
| ROLE (320.108) 58.2.2 
| ROLE (328.189,58, 5, «5 

C 


CIRCLE 命 令 て は 、 こ ん な 風 に た 円 を 描く 
こと も て きま す よ 


X 


r OD UNE e L6 TE 


POLY て 星 を 描き 、 g 


応用 プロ グラ ム の 〈 も の 巣 て す 。 き れい で 
Lay 


— = 
THE CONSTITUTION OF JAPAN | 
BABB | 


Ma 


21211838 137: 52285438 | 


美しい 日 本 国旗 と セイ テイ 、 ハ ッ コ ウ の 年 


月 日 が 表示 され ます 
s-a ) ] 
す ン ナウ ^ = ネン 29 J MIN 7774. ZAMEN 
Apo mx ym の fa の | "n 


sies 
ise e in mam 


"O(9^* Poto »*z*5 € » 
tM a toato pean m nene | 


raum | 


肖 題 は この 11 章 の 中 か ら 各 1 問 。 一 回 第 1 問 は 第 1 章 「 天 皇 」 か ら て すね 。 あな Bee 先 生 の 場合 は 、 5 問 中 3 問 正解 で し た 
ンジ て 、 5 問 出題 され ます た は 、 で きま し た 


D E 
| |n psa 39929 ) 9292s pn ) nt | 

ym e" X に | 
pi "yv 


: P 4 
E dod 
F 


3 be 英語 て 書く と 


[ 


"nd. | 7 hb) 9: 9 ちく て マズ P ?和 | VN aana de | $*3) 01 * sastva D CN | 
J gent. \ 1 
| M J 929°: | A AN AS 
rt —— 
1 SER. この 中 か ら 更 に 調べ た い 国 の 番号 を プッ シュ 
1 nes 2 MM) 132 ui JA cM 
3 nma) 4 3-090215 92 / á 
5 "mmo 6 inhnWi | | 3-00") 9:9a 849 J が 3430300 ) 929% 2s 
| : mr 2 m T 
| トー コナ 92 9 y55*932 b ^8 | E H HE, 
| ) Ne" 
mre 


まず 、 こ の 様 な 表示 が 出 ま すか ら 、 
調べ た い 地 域 の 番号 を ブッ シュ \ | 
| ) 


まこ z .. , k*3) 92 9 りう へ "マス aa 
3) 92 9 y55*32 Bh '8 $*3) 9: 9 »9^**2 B ?N 


a? AA ` B = 
p J! 
ジ 州 それ で は 、 各 国 の ディ スプ レイ 表示 を ラン ダム に 観 て 楽し み ま し ょ う 


| = 

| {21 Be: a9 15:80: 

12:68:09 | 
dini: [Erie fe diei dn 

ETTA 7] ENERO | 


12:81:27 


dim ES. | Barea? 
日 本 イエ メン 


y" Y 


I 


12:B0:58 
85:08:58 


イラ ラキ m= ララ コラ | 
Republic of Iraq 


EIA E 


Push anw kew 


LEX 


Push any key 


イス ラ エ ル ホイ ラク 


12:82:27 
835702127 
de E Republ is Pads 

‘bs! fl, | 


Push any kew 


ラテ マイ カニ ミニ ジラ タラ | 
| イー トー キジ アキ ョ ララ っ ララ | Aia Gi e | c» Kampuchea 


Tm of Indonesia TENE èa 
iuri EE. siia 


E des BERI us. Ku an Key 


| Push any key 


gei ji 


| Push any key 


イン ド ネ シア 大 韓 民国 カン ボ ジ ア 
| 12183: 06 
| 11783: 06 


シー シミ 
ag = Republic of China 


Geb BEES. 


Push any key 


| マミ ラコ テー | | 
Kingdom of Thailand 

HATRB CH 

e Bilan. | | 


Push any kew 


Su => + >: Me 
Republic of Singapore 


vote | ZEB Ens” 
| iue": e Erig ice 


| Push any key Sete et bxc n ER of Pakistan 
| 301 > 
\ EER C SN En ico: ioo 


Push any key ] 


Push any key 


12:87:20 
68787: 20 


Hashemite Kingdom of Jordan 
zate | Réféeo 
des cs 


1 ; 666. 
Push any key | Push any key Emm 


モル ジブ ョ ヨル ダン 


lic of Maldives 


(ivi figs... eee 


Push any key 


htt | 
WELT 
gioi Bim... | 


し = m 


オー スト ラリ ア 
12:88:20 
18798120 


E ES, 
v Zealand 


Push any key 


ニュ ー ジ ー ラ ンド 


12:B9:28 
84:53:28 
ーー ルー シレ シラ コマ ラキ m= ララ ララ 
RAN Etiopia United Republic of Cameroon 


ivi Es EE A 


Push any kev | Push any kew 


12:69:06 
633 63: a6 


12:69:17 


6 gi キッ 


一 


エチ デオ ビア カメ ルー ン 


12:89:39 
13:89:39 


12:89:54 
66:65:54 


LAT 
People's Revolutionary of Guinea 


12:10:33 


63:16:33 


z T L- a 972737 
Republic of Sierra Leone 


っ A 


Push any key 


12:10:22 
84:18:22 


12:10:07 
85:10:07 


12111: 49 
deriives 


12:11:28 
3:11:33 


12:11:19 
97711119 


1210: 48 


85:18: 48 


——— M: m 
Somali Demooratio Reeublio —  — 


qlo: prstke, =e 


Push any key 


Push any kew 


12112: 47 
84:12:47 


12:12:28 
64:13:28 


==5 
Republic of Júnia 


ginl Bit. 


pne | 


チエ ンジ ア 
PI = lr L^ | EI っ コラ 
United Republic of of Tanzania 


121 33:17 
84723117 


FEIECIIT- 


OE T 


Push any key | ー コ で = っ っ コラ 
Republic of Togo 


64:43:00 


| LE Raa, 


Push any kew 


べ ベナン 人 民 共 和 国 


ot $4: gs | 
| 83124185 


15:33:25 


83723735 


Libyan Arab Jamahiriya 


eS A 


Push any key 


Islamio Republic of Mauritania 


do) i 


Push any kew 


モー リタ ニア 


12134: 29 

63% 24 29 

— Q = キン yh; 
12:25:14 


63:28:14 


ささ リネ く ラ マエ レー トラ で UF 
Uni ted Kingdom of Great Britain 
Guo Halte 
[eH ES ・ 60d; ese 


マモ デニ ジー アラ ラマ キョ = ララ ララ アイ ラン トマ Push any key 
Yemen Arab Republic Tay yt | 
iii Pes. Gori Ribas. A " 
Push any key Push any key = - -— ...”. 
— MÀ Pikes: イキ リス 
イエ メン 
NE APR Hl ES E 
に / 
are RES E 
121 25:23 121 %5: 31 TY 851 46 121 25:56 
B4Y Es: 29 84:25:31 84Y2874e aa 
* —6EF UP?» Fe 5055 
Republio of Italy | Republic of Austria Kingdom of the Netherlands 
site Ba | zte i gk bak, ! Ie21&2" 
e oo, EE S m j (0 LEM IL. 
Push anw kev Push any key | | Push any key / 
" "— i | €— a - EA BA PA 
イタ リア オー スト リア 


12156: 40 


84726718 84:126: 40 


=320 - 


= 
ieohos 1 Guak Socialist Republic 


スウ ェ ー デ ン チェ コス ロバ キア 
RARE SS 
Swiss Confederation / 


12:%7:00 
641 27:00 


12: Be: 49 
84:56:49 


スイ ス 


ドイ ツ 連 邦 共和 国 195 


12: 7:14 
Ba: 57:11 


っ => A a e P 
US res io 


12:27:22 
65: 54:22 


{2:30:13 ] | 
331 58:12 


12129:59 
86:25:59 


Er ot bevies oblatis pep} ion 
vab, ! 


devi athl 


デ = ジジ 
United States of America 


dis! Bühnen 


Push any kew 


=. 


12: 50:53 
32:38:53 


12150: 40 
527387 40 


Push any kew / \ 


y パナ マ 


12:51:54 
25:81:54 


12:51:26 S s 
21:81:56 


+= = < EI D E D 
Republic of Honduras 


deso: HE ia bh 


Push any key 


12:29:35 


84: ちら: 35 


で と キー デー オラ ies 
Kingdom of Belgium : 
H e hiis. eee ] 


84:29:47 
ES SISZELZERUTU*- 


ialistFederalRepublic of Yugoslaut 


SUE i m 


Push any key 


ユー ゴス ラビ ア 


12:30: 25 


Concrete of Bahamas - | 
zt Pa 
Got Bits A 


ush any kew | 


12:52:84 
23:32:84 


Fa 
Republic of Surinam 


BB BSa aa 


Ex SUE m 


Federative Republic of Brazil 


ient [oS 


| Push any kew 


S 


フラ ジル 


全く 何 も 知 ら な い 状 態 か ら , まだ まだ 不 十分 で は ある に せよ , 
一 通り の コマ ンド や プロ グラ ム の 考え 方 が わか る と と ろ ま で 来 
まし た ョ ヨ 。 BAA, どど 苦労 さま で し た 。 長い 道のり で し た ね ぇ 

ST, と と まで 来 た か ら に は , 私 と し て は 是非 , 直接 の きっ 
か け に な っ た 法律 に コン ピュ ー タ ー を 結び つけ た い の で す 。 

最近 , 日 本 国 憲 法 が ベス ト セ ラー に な っ た の は 知っ て ます 
か ? 

THE VISUAL CONSTITUTION OF JAPAN 
「 あ な た は 読ん だ こと が あり ます か 」 

と 書い た 赤 帯 が 表紙 に つい て いる 本 で , 大 き な 活 字 と 写真 入 
り で 読み や すく な っ て いる ん で す よ 。 

1 ペー ジ 目 を 開く と , 地球 を 宇宙 か ら 見 た 写真 が バー ン と 出 
TOT, 日 本 列島 の 写真 な ん か も 入っ て いま す 。 と れ は 本 当 に 
写真 か な 。 と うし て みる と , 日 本 っ て 緑色 の 島 な ん で すね 。 何 
故 だ か わか ら な いけ れ ど , ちょ っ と 感動 し て し まっ た な あ …… @ 
7y! 今度 は 眼 の アッ プ 。 大 きく 眼 を 開け て , 自分 の 国 の 憲 
法 を 読ん を で ご どら ん な さい と いう つも りな の か し ら ? 

写真 が きれ い だ し , アイ ディ ア も いい し , な る ほど , ベス ト 
セラ ー に な る 要素 は 十分 で すね ぇ 。 六法 の 中 の , ぎっ し りつ ま 
っ た 文字 の イメ ー ジ と は , まる で 違い ます も の 。 

さて , と の 日 本 国 憲法 を , プロ グラ ム に し よう な ん て , KW 
それ た 考え か も 知れ ませ ん ね 。 で も と も か く や っ て み ま し ょ う 。 


まず RBORETH FS, 资料 
THE VISUAL CONSTITUTION 
OF JAPAN 小学 館 発行 


198 


表 1 
日 本 国 憲法 練習 問題 
B 天皇 は 日 本 国 の [[] で ある 。 (第 1 条 ) 
① 総 理大 臣 ② 元 帥 ③④ 象徴 ④ 恋 人 
AM 国 の [LT] は これ を 認め な い 。 (第 9 条 一 ②) 
CREDOR HECH EOK H HE 
問 日 本 国民 た る 要件 は [| 」 で と れ を 定め る 。 (第 10 条 ) 
① 憲 法 ②④ 民 法 ③ 国 会 ④ 法 律 
RB) 秦 議 院 議員 の 任期 は [ ] と する 。 (第 45 条 ) 
CD 4 年 ② 1 年 ⑧ 6 年 ④ 3 年 
問 行政 権 は [上 1] に 属す る 。 (第 65 条 ) 
① 国 会 ② 天 皇 ⑨ 総 理大 臣 ④ 内 閣 
fa] [上 | は 最高 裁判 所 の 定め る 規則 に 従わ なむ けれ ば な ら な い 。 
(第 77 条 一 ②) 
① 裁 判官 ⑦ 国 民 ③ 皇 室 ④ 検 察 官 
問 国 の 財政 を 処理 する 権限 は , [| の 議決 に 基 い て , cn 
を 行使 し な けれ ば な ら な い 。( 第 83 条 ) 
① 内 閣 ④ 国 会 ③④ 裁判 所 ④ 弁 護 士 協 会 
問 地方 公共 団体 に は , 法律 の 定め る と と ろ に より , その 議 
事 機関 と し て [| を 設置 する 。( 第 93 条 ) 
① 地 方 裁判 所 ② 議 会 ③ 地 方 自治 体 ④ 振 興 会 
問 憲法 改正 は , 各 議 院 の 総 議員 の [LT] の 賛成 で , 国会 が , 
と れ を 発議 する 。( 第 96 条 ) 
①5 分 の 2②4 分 の 1⑧3 分 の 2④3 分 の 1 
問 憲法 は , 国 の [[ ] で ある 。 (第 98 条 ) 
① 財 産 ④ 命 重要 な 法 ④ 最 高 法規 
問 と の 憲法 は , 公布 の 日 か ら 起算 し て , [を 経過 し た 日 
か ら , と れ を 施行 する 。( 第 100 条 ) 
① 1 年 ② 1 週間 ③ 6 箇月 ④ 3 箇月 


と れ は 日 本 国 憲法 の 第 1 章 一 第 11 章 の 中 か ら (第 1 章 天皇 , 
第 2 章 戦争 の 放棄 , 第 3 章 国民 の 権利 及び 義務 , 第 4 章 国会 , 
第 5 章 内 閣 , 第 6 章 司法 , 第 7 章 財政 , 第 8 章 地方 自治 , 第 9 
章 改正 , 第 10 章 最高 法規 , 第 11 章 補 則 ), ひと っ つ ずつ 練習 問題 
を 出題 し た も の で す 。 

DED, 今 作 ろう と し て いる プロ グラ ム の 内 容 は , と れ ら の 
練習 問題 を アロ グラ ム に し て , お 友達 の 憲法 に 対す る 知識 を 試 
し て みよ うと いう も の な ん で すね 。 

た だ 練習 問題 だ け で は 面白 く な い の で , つい で に 日 本 の 国旗 
と 英文 で 書か れ た 前 文 も プロ グラ ム し ちゃ いま す 。 

最初 に ディ スプ レイ と プロ グラ ム を 示し , 次 に プロ グラ ム の 
説明 を し て 行き ます ヨ 。 


THE CONSTITUTION OF JAPAN 


E A BE 


t4T4:521*F11ASB ng コウ ョ ご ご と 年 ご 月 日 


We:the Japanese people; acting SITO oun duly elected representatives in the 
National Diet, determined that we shall secure for ourselves and our posterity 
the fruits of peaceful cooperation with all nations and the blessings of liberty 
throughout this land, and resolved that never again shall we be visited with the 
horrors of war through the action of government:do proclaim that soyerelgn power 
resides with the people and do Mr establish this Constitution: Government is 
a sacred trust of the people:the authority for which is derived from the people, 
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the powers of which are exercised by the representatives of the people; and the 
benetits of which are enjoyed t the people: This is a universal principle of 
mankind upon uhich this (Constitution is founded. We reject and revoke all 
constitutions, laws, ordinances, and rescripts in conflict herewith. 

We; the japanese people, desire peace for all time and are v. conscious of 
the high ideals controlling, human relationship» and we have determined to 
preserve our security and existence: trusting in the Justice and faith of the 
peace-loving peoples of the world: Me desire to occupy an honored place in an 
international society striving for the preservation of peace; and the banishment 
of tyranny and dpi oppression and intolerance for all time from the earth» 

We recognize that ail peoples of the world haue the right to live in peace: 
free from fear and want» 

We believe that no nation is responsible to itself alone» but that laws of 
political morality are universal: and that obedience to such laus is incumbent 
upon all nations who would sustain their oun sovereignty and justify their 
vue relationship with other nations. 

e, the Japanese people, pledge our national honor to GRIP] sh these high 
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さて 日 本 国 憲 法 練 習 問 題 プ ログ ラム の 解説 を し まし ょ う 。 
1 番 ~9 番 は REM 文 で , Program の タイ トル と 製作 年 月 
A, 製作 者 の 名 前 な ど を 入れ て お きま す 。 REM は 注釈 で し た 
よね 。 
10 プロ グラ ム の 最初 に は , 必ず 初期 化 が 必要 で す 。 
DEFINT a—z 
すべ て の 変数 を 整数 形 . つ まり イン テ ジ ャ ー で 使用 する 
と よい うと と を 宣言 し ます 。 
DIM Ka$ (52, m$ (11), t (11) 
プロ グラ ム の 中 で 使用 され る 配列 変数 を 宣言 し ます 。 
Ka$ (52) = 漢字 パタ ー ン 52 個 の 配列 
m$ (11) = 練習 問題 11 題 の 配列 
t (11) = 同じ 問題 を 2 度 繰 り 返 さ な い た め の 配 列 
20 画面 の 初期 化 を 行い ます 。 
WINDOW (0, 0) 一 (319, 199) 
画面 全体 に グラ フィ ッ ク が 出せ る 指定 で す 。 
SCREEN 1, 1, 0 


206 


260 


780 


30 


ディ スプ レイ に 表 わ れ る 画面 が 1 で , プロ グラ ム の 書か 
れる 画面 が 1, グラ フィ ッ ク で は 3 面 つ か える と いう 指 
ETT, 

CLS 0 

グラ フィ ッ ク 画 面 を 全て 消し ます 。 前 に 描い て あっ た グ 
ラフ ィ ッ ク 画 面 を 消す た めで す 。 

PALET 

と の プロ グラ ム で は , グラ フィ ッ ク を 使え ます よ 。 
WIDTH 40 

40 文 字 モ ー ド の 画面 を 使い ます 。 

CLS 

テキ スト 画面 も 全部 消し まし ょ う 。 

GOSUB 260 

260 番 の サブ ルー チン 飛び ます 。 

260 番 か ら 770 番 まで は , 漢字 の グラ フィ ッ ク ・ パ ター 
ン が 入っ て いま す 。 

Ka$ (1)=HEXCHR$ (“……”) 

漢字 の パタ ー ン は HEXCHR$ の と と ろ で 説明 し た 通り , 
16x16 DOT の パタ ー ン デー タ で 構成 され て いま す 。 
RETURN 

サブ ルー チン を ぬけ ます 。 

最初 の グラ フィ ッ ク 画 面 を つく り ま す 。 

LINE (85, 38) 一 (190, 58), PSET, 3 b 

(85, 38) か ら (190, 58) まで の 線 を 対角線 に し た BOX 
を マゼンダ で 描き ます 。 

LOCATE 5 2 

(5, 2) の 座標 か ら 

COLOR 6 

黄色 で 

PRINT “THE CONSTITUTION OF JAPAN" 

THE CONSTITUTION OF JAPAN と 書き ます 。 

LINE (45 70) — (225, 170), PSET, 7, BF 


207 


208 


40 


50 


910 


(45, 70) か ら (225, 170) まで の 線 を 対角線 と する 
BOX を , 白 で ぬり つぶ す 。 

CIRCLE (135, 120), 30, 2 

赤い 半径 30 の 輪 を , (135, 120) を 中 心 点 と し て 描き ま 
す 。 | 
PAINT (135, 120) 2, 2 

先 に 描か れ た 赤い 輪 ま で , 同じ く 赤 い 色 で ぬり つぶ し ま 
Fo とれ で 日 の 丸 の で き 上 が わり ! 

日 本 国 憲 法 と , 漢字 で 前 に 描い た マゼンダ の BOX の 中 
に 入れ まし ょ う 。 

FOR ¡=1 TO 5 

漢字 の 数 は 5148722 517, 

POSITON ¡x20+70, 40 

X 軸 を 1 文字 20 DOT ずつ ずら し まし ょ う 。 
COLOR 4, 0 

文字 の 色 は 緑色 に し ます 。 

PATTERN-16, Ka$ (i) ~ NEXT i 

5 個 の 漢字 が で き 上 が り 。 

最後 に メッ セー ジ を 書き まし ょ う 。 

LOCATE 2, 23 

書き 出し は 2 , 283 で す 。 

PRINT “セイ テイ , ハッ コウ ”" 

制定 昭和 21 年 11 月 3 日 , 発効 昭和 22 年 5 月 3 日 
漢字 が 簡単 に 書け た ら , と これ も 漢字 に し た か っ た の に ネ 。 
GOSUB 910 

910 行 の サブ ルー チン へ 

音楽 『 さ くら さく ら 』 の サブ ルー チン 

TEMPO 100 

TEMPO は や や ゃ や 遅 め に し まし た 。 

PLAY 

と れ が 苦労 の 三重 奏 , 日 本 調 を 出す た め お 琴 風 の 演奏 で 


990 


50 


1000 


1010 


1250 


1260 


60 


RETURN 

50 番 へ まい 戻り 。 

GOSUB 1000 

SERS 7— 5-504, 

CLS 0: CLS: WIDTH 80 

画面 を 全て 消し て , 80 文 字 モ ー ド に いた し まし ょ う 。 
日 本 国 憲 法 前 文 。 ち ょ っ と 気 ど っ て 英語 で 書い て み ま し 
Es 

"日 本 国民 は , 正当 に 選挙 され た 国会 に お ける 代表 者 を 


"日 本 国民 は , 国家 の 名 誉 に か け , 全力 を あげ て と の 上 崇 
高 な 理想 と 目的 を 達成 する と と を 閣 ふ ”。 
読み 終わ っ た ら 合 図 を 送り まし ょ う 。 
COLOR 7 

文字 は 白 で 。 

CFLASH 1 

フフ ラッシング ・ キ ャ ラク ター を 使っ て 。 
LOCATE 57, 24 

57, 24 の 位置 に , 

PRINT "RETURN キー ヲ オ シテ クダ サイ ” 
と メッ セー ジ ! 


WHILE INKEY$ - * " : WEND 
キー 入力 が ある まで , 待ち まし ょ う 。 
CFLASH 0 


フフ ラッシング キ ャ ラク ター を 止め まし ょ う 。 
目次 を グラ フィ ッ ク で か っ こ 良 く 。 

PALET 

BREF IJa yZ e t- FER LELe a, 
CLS 0 : CLS 

前 の 画面 を 全て 消し ます 。 

WIDTH 80 

画面 は フル に 使い まし ょ う ね 。 


209 


210 


70 


80 


COLOR 4 

色 は 緑 で 

Po= 622 

グラ フィ ッ ク の POSITION を 変数 PO に 入れ まし た 。 
P 1=59 

各 章 は , 59 DOT ずつ あけ まし ょ う 。 

P 2=40 

使う 漢字 は 40 個 で す 。 

FOR ¡=1 TO 11 

第 1 章 か ら 第 11 章 

COLOR 4 

ROET 

"第 〇 章 " を 書く ルー チン 

POSITION PO, 5 

画面 の 右 か ら 書 きま し ょ う 。 

PATTERN 一 16, Ka$ (37) 

T 

POSITION PO, 22 

数 字 を か く 位 置 

PATTERN 一 16, Ka$ (P 2) 

cr» 
POSITION PO, 39 
章 を 書く 位置 
PATTER 一 16, Ka$ (38) 


ar 


PO=PFO—P 1 

POSITION を ずら し て 下さ い 。 
に 9 な て る 

次 の 漢字 配列 の 準備 ! 

各 章 の 内 容 を 入れ まし ょ う 。 
FOR j=1 TO 9 


fru OMFAIME Lt Jo 


790 


80 


90 


READ yk 

変数 yk に 漢字 デー タ を 読み 込み ます 。 

DATA 

DATA は 全部 で 9x11 個 (99 個 )。 

B,- 7, Bs Os 0, O, Us O, 0 

た と えば "Kg" で は 漢字 デー タ の 6 番 (31017) CR, 
7 Æ (320 行 ) は 皇 , 後 は 7 個 分 の スペ ー ス と な り ま す 。 
な ぜ ス ペー ス を 書い た か と いう と , 一 番長 い 文章 は , 第 
3 章 の “国民 の 権利 及び 義務 " の 9 文字 だ か ら , 全て 9 
文字 分 の デー タ を 入れ た と いう わけ ! 一 度 使 っ た DA- 
TA は 2 度 と 使用 で きま せん 。 何 度 も 使 お うと する た め 
に は , 変数 yk を 配列 変数 に し て お け ば 良い で す ネ 。 と 
の 辺 は , 皆さん お 好き な よう 改造 し て みて くだ さい 。 
COLOR 6 

内 容 は 黄色 で 。 

POSITION PO +29, 21+jx18 

横 位置 は PO+29, WME 21+3X18 

一 字 は 16 x16 DOT な の で , 2 DOT あけ て 18 DOT ず っ 
並べ まし ょ う 。 

PATTERN— 16, Ka$ (yk) 

今 の 指定 に , 一 文字 入れ て 。 

NEXT j, i 

全て の 漢字 が で き 上 が り ! NEXT) は 80 番 の 頭 の FOR 
it, と れ は 内 容 。 NEXT i は 40 番 の 頭 の FOR i で , 
と れ は 全体 。 全 体 の FOR i, NEXT 1 の 中 に , AÑO 
FOR j, NEXT j が ある と いう わけ で す 。 

FORi=1 TO 5000: NEXT i 

実は こと れ タイ マー。5000 数 える まで 待ち まし ょ う U 
COLOR 7 

色 は 白 に 変え て 。 

PRINT 文 で メッ セー ジ | 

LINE (0, 140) 一 (400, 198), PSET, 7, B 


211 


212 


100 


110 


120 


画面 の 左下 に 白い BOX を 描き まし ょ う 。 
LOCATE 2, 18 

書き 出し は BOX の 中 。 

PRINT “ニホン コク ケン ポ ウ ラ ヲタ ダシ クリ カイ スル タメ 
ニカ クシ ョ ウノ モン ダイ ”" 

PRINT "ニコ タ エ テ イタ ダキ マス 。 ダイ 1 ショ ウ カ ラダ 
イィ 11 シ ョ ウゥ マデ ノ ” 


PRINT で ナカ カラ ムジ ゲ ウ サニー5 モ ツル タダ イオ イタ シッ マス 。 
BAA SSS ere ey” 

PRINT “サイ 。 ア ナタ ノ ケ ン ポ ウニ タイ スル リカ イド ラ ヲ 
テス ト サ セ テイ タダ キマ ス " 

と 4 行 分 の メッ セー ジ 。 

KEY 入力 を 待ち まし ょ う 。 

CFLASH 1 

フラ ッ シ ア グ = ェ キャ ラグ ダ ター 名 使い まし ょ う 。 
LOCATE 15, 23 

一 番 最後 に , PRINT “RETURN キー ヲ ラオ シテ クダ サイ “ 


と メッ セー ジ 。 


WHILE INKEY $=“ ": WEND 
KEY 入力 を 待ち まし ょ う 。 
CFLASH 0 


KEY 入力 が 入っ た ら フ ラッ シン グ を 止め まし ょ う 。 
さて , いよ いよ 出題 で す 。 

FOR i=1 TO 11: READ m$ (i) : NEXT i 

11 問 の 問題 を すべ て m$ の 配列 に 読み 込み まし ょ う 。 
DATA 


V " A ペー ュー ツ 


mem 選択 肢 の 部 分 正解 
DATA の 中 味 は , と ん な 構成 に な っ て いま す よ 。 も し 皆 


さん が DATA を ふやす 場合 は , 必ず と の よう な 構成 に 
Leh Ee, 


130 問題 を 5 問 つ くり まし ょ う 。 同じ 問題 は 2 度 出 な いよ う 


140 


150 


160 


170 


FOR i=1 TO 11 

まず , 全部 の 問題 の , 

t (i) =0 

初期 化 を 行い ます 。 全て の 出題 に 0 を 書き ます 。 
NEXT i 

P=0 

と れ は , 正解 数 の 初期 化 。 

FOR ¡=1 TO 5 

5 問 出題 させ まし ょ う 。 

X= INT (11% RND (1)) +1 

11 題 の 中 か ら 無 作為 に , 

XX - t (X) 

一 度 出題 され た も の は , 

1 F XXX >0 THEN 140 ELSE t (X) = 1 
配列 に 1 を 入れ て お きま し ょ う 。{t (X) が 1 の 場合 は , 
すでに 出題 済み と いう 事 で , 他 の 間 題 を 探し に 行き ます 。 
次 の 画面 の た め に 準備 を し まし ょ う ! 

CLS 0 : CLS: PALET : WIDTH 40: COLOR 5 
画面 を 消し て , 40 文 字 モ ー ド に , 色 は シア ン で す 。 
何 題 目 か を 書き まし ょ う 。 

POSITION 5, 5: PATTERN-16, Ka$ (37) 
EEK "第 を 書き まし ょ う 。 


POSITION 23, 5: PATTERN -16, Ka$ (39 +i) 
問題 番号 を 書き まし ょ う 。 

POSITION 41, 5: PATTERN —16, Ka$ (51) 
“AR” を 書い て , で き 上 が り ! 

COLOR 4 

色 を 緑 に 変え まし た 。 

いよ いよ 出題 で す 。 

LOCATE 0, 5: PRINT LEFT$ (m$ (X), 68) . 
問題 を 書き ます 。 DATA の 左 か ら 68 個 と り ま し た 。 


213 


214 


180 


190 


200 


210 


LOCATE 3, 10: PRINT MID$ (m$ (X), 69, 55) 
選択 肢 を 書き ます 。 DATA の 左 か ら 69 個 目 か ら 55 個 と り 
HL*NEY, 

さあ , 正解 は どれ か な ぁ …… T 

COLOR 7 

EAT, 

LOCATE 3, 15: PRINT “セイ カイ ハナ ン バ ン デス カ ” 
と メッ セー ジ を 書き まし た 。 

z$=INKEY$ (1) :1F 2$- * " THEN 180 

ELSE z = VAL (z$) 

解答 を と り 込 む ま で 待ち まし ょ う 。 解答 は 文字 列 で 入っ 
て くる の で , VAL で 数 字 圧 換え まし ょ う 。 

判定 を し まし ょ う ! | 

IF z = VAL (RIGHTS (m$ (X), 1)) THEN P=P+ 1 
DATA の 一 番 右 か ら 正 解 を と っ て きま す 。 正解 だ っ た ら 
正解 数 を 1 つ ふ や し ます よ 。 

LOCATE 23, 15: CFLASH 1: PRINT “セイ カイ 11” 
ELSE LOCATE 23, 15: PRINT “マチ ガイ ” 
正解 か 間違え か の メッ セー ジ 。 

次 の 問題 に うつ つり まし ょ う 。 

LOCATE 6, 23: CFLASH 1: PRINT "RETURN キー 
ブ オ レデ クダ サザ サイ” 

レル メダ AAA RAT OA, 

WHILE INKEY$ = “ " : WEND : CFLASH 0 

キー 入力 が あっ た ら , フラ ッ シ ン グ を や め ま し ょ う 。 
NEXT i 

さぁ, 次 の 問題 に チャ レン ジリ 

結果 は , どう だ っ た か ナ ? 

CLS 0: CLS: PALET : COLOR 4 

毎度 お な じみ の 画面 の 初期 設定 で す 。 

POSITION 100, 50: PATTERN —16, Ka$ (39+P) 
何 問 正解 か , P の 値 で 決ま り ま す 。 


220 


230 


240 


250 


POSITION 118, 50 : PATTERN —16, Ka$ (51) 
"Ru" を 書き ます 。 

POSITION 136, 50 : PATTERN -16, Ka$ (31) 
"E" を 書き ます 。 

POSITION 154, 50: PATTERN —16, Ka$ (52) 
“fe” を 書き ます 。 

COLOR 6: LOCATE 15, 11: PRINT “Fug” 
デシ タ を 表示 させ ます 。 


LOCATE 3, 15: PRINT “モウ イチ ド チ ョ ウ セ ン シ マ 
スカ (y or n)" 

と 書き ます 。 

Yes か No の 判定 

a$=INKEY$: IF a$=“ " THEN 240 ELSE IF 


a$=“y” THEN 130 

y 以外 全て の 文字 は うけ つけ ませ ん 。 
これ で 全て が 終わ り で す よ 。 

CLS 0: CLS : END 

画面 を 消し て , いよ いよ END T, 


SH, 楽し ん で も ら え まし た ? 今 ま で 勉強 し て きた 事 の 集 
KRH, と の プロ グラ ム で す 。 だ いた い の 命 令 は 入れ て あり ま 


す が, 


人 復習 に な り ま し た か , どう か 。 


正直 言っ て も う 精 一 杯 と いう 感じ な ん で すけ ど , も し も と と 


は と う 直 し た 方 が スム ー ズ だ と いう アイ ディ ア が あり まし た ら , 


どん どん 教え て くだ さい ね 。 な ん と いっ て も , まだ 始め た ば か 
り の 生徒 で すか ら 。 ま た と の プロ グラ ム の 内 容 に 関し て も , 適 
切 で な いと 思う 方 も いる で し ょ う が , と れ を 参考 に いろ いろ 考 
えて みて くだ さい 。 

また と の プロ グラ ム の 内 容 に 関し て も , 適切 で な いと 思う 方 
も いる で し ょ う が , と れ を 参考 に いろ いろ 考え て 変え て みて く 
FEW, 

人 それ ぞ れ に 違う 使い 方 が ある は ず 。 自分 に と っ て BEST の 
使い 方 を 者 えて みる と いい で す ネ 。 
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: $":05$:": 000,000" ELSE PRINT "GNP + " 


LOCATE2, 21: IF 42=8 THEN PRINT"GNP 


と れ は グラ フィ ッ ク 命 令 を 使っ て , 何 か 楽 し い プ ログ ラム を 
作っ て みよ うと いう 事 で , 先生 が 旗 の プ ログ ラム を 考え て くれ 
- た も の で す 。 世界 72 カ 国 の 旗 を 入れ て , し か も 時 差 を 計算 し て 
SE M の イー 時 計 も 入れ ちゃ っ た ん で す よ 。 す どい で し ょ う 。 

その 他 , 人 口 と か , 面積 と か , GNP も 出 て きま す よ 。 

さて ,『 世 界 の 国々 』 の 調べ 方 で す 。 

まず , と の よう な 表示 が 現れ ます か ら , 調べ た い 地 域 の 番号 
を Push ! (写真 1) 

Leb, 今 は と りあ え ず アジ ア を 見 て み ま す ョ ヨ 。 

次 に は , と の よう に アジ ア 各 国 の メニ ュー が 出 て 来 ま す 。 E 
1 7273 pu? 43933) れ に し よう か ナ 。( 写 真 2) 
3 nma MERC さあ , どう で すか 。 苦労 に 苦労 を 重ね , 何 度 も や り 直 し て 作 
Co tei i ia りあ げた 旗 の グ ラフ ィ ッ ク な の で す 。 き れい で し ょ 。 も ちろ ん 
時 計 や 資料 も 正確 で すか ら ネ …… o 

と と ろ で , 次 に プロ グラ ム の 流れ を 見 て いき まし ょ う 。 延々 
と プロ グラ ム が 続い て いて , すご どく 難し そう だ けど , どう な っ 
て で ゆい る ん で し ょ よう ね 。 

実は , と の プロ グラ ム の メイ ン ル ー チ ン は 40 番 だ け な の で す 。 
と の 一 行 で 流れ を 決め て し まっ て いる の だ か ら , スゴ イ で し ょ 。 

30 番 で イニ シャ ライ ズ (初期 化 ) が 行わ れ , 40 番 で サブ ルー 
チン へ 飛ば し , GOTO 40 で 何 度 も くり 返す わけ で す 。 

つま り , と れ だ け 長 い プ ログ ラム も , ほとん ど が デー タ の 部 
分 で あっ て , プロ グラ ム 自 体 の 流れ は , けっ と こう 単純 だ と いう 
わけ 。 あ まり 恐怖 心 を 持た な く て も 大 丈夫 で す よ 。 

さて , 50 番 を 見 て くだ さい 。 と の 行 に は 日 本 の デー タ が 入れ 
て あり ます 。 (写真 3 ) 

まず C=7 で 色 を 白 と 指定 し , 1280 番 の サブ ルー チン へ 飛ば 
Lt, 白い 旗 を 描か せま す 。 次 に 中 心 座標 と 色 (と と で は 赤 ) 
を 指定 し て や り , 今度 は , 円 を 描い て ぬり つぶ な す サ ブル ー チ ン 
(1310, 13200 へ それ ぞ れ 飛ば すわ け で す 。 も ちろ ん , サブ ル 
ー チ ン の 後ろ に は RETURN が つい て いま すか ら , すぐ に 50 番 
へ 戻っ て きま す よ ね 。 
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それ か ら , 日 本 に つい て 順番 に 入っ て いる デー タ を 読ん で 表 
示し て くれ る わけ で す 。 デー タ は , 国名 (カタ カナ ), 国名 E 
語 ), 首都 , MM, AO, GNP, 日 本 時 間 と それ に 各国 の 首都 
時 間 で す 。 

1 カ国 分 の 流れ は 大 体 と ん な 感じ な ん で す 。 描く の が 難し い 
国旗 も あり まし た が , サブ ルー チン 処理 を で きる だ け ひけ 利用 し て 
büTLÉLJI, 

た と えば , 大 洋 州 の 国旗 に は , すべ て 英国 旗 が 縮小 され て 描 
か れ て いる の で , WINDOW 命令 を 使っ て , 英国 族 を えにし た 
サブ ルー チン を 作り まし た 。 その 他 で は , 星 の 形 を 書く サブ ル 
ー チ ン , 縦 三 つ に 分 か れ て いる 旗 (フラ ンス や イタ リア 等 ), 
横 三 つ に 分 か れ て いる 旗 な ど と いう 形 で , まとめ られ る も の は 
ET HIM- F rel Eos TREEDT V a To 

50 番 か ら 1250 番 まで , と の よう な 流れ で 72 カ 国分 の デー タ が 
人 和信 っ て いま す 。 

1260 番 か ら 1520 番 まで は , グラ フィ ッ ク 命 令 が 入れ て あり , 
旗 を 描く の に 必要 な 命令 が GOSUB-RETURN で どん どん 使わ 
れ ま す 。 

1530 番 か ら 1750 番 まで は , 最初 に どの 国 を 調べ よう か 決め る 
まで の 画面 に 現れ る 内 容 で す 。 地域 別に わけ た 国 の リス ト が , 
出 て くる 部 分 の プロ グラ ム で す よ ね 。 

1760 番 か ら 1820 番 は , 国名 の デー タ で , 地域 別に 分 け て 入れ 
られ て いま す 。 

1830 番 か ら 1860 番 あたり は , 人 口 や 面積 に 格差 が 生じ た 国 の 
数 字 の 表示 の 仕方 を , 0 を 減ら し た り し て 調節 し て いる 部 分 で 
す 。 

そし て 最後 の 2 行 (1870, 1880) T, 日 本 時 間 と , 各国 の 首 
都 時 間 を , 時 差 を 計算 し て 入れ て いま す 。 

一 通り の 流れ は , と ん な 感じ な ん で す が , どう で し ょ う ね ぇ 。 
プロ グラ ム の 中 に も , そ と で 何 を や っ て いる の か わか る よう に , 
1 ボッ クス フル な ん て いう 風 に 入れ て あり ます か ら , 見 て も ら 
えれ ば 分 か る ん じゃ な いか な あぁ あ 。 
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INPUT 


KEYS:File 
KEY6:File 
KEY?:File 
KEYS: 2° ULD39-ON/OFF 


オマ エ 

HUDSON SOFT 
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HUDSON SOFT 
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ラメ カド ワウ LU 


* メイ レイ d*2»b'a7 X 
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KEY3:File 
KEY4: File 
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"4h 
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し 5 ヤル コー トル KEY お ね 」 
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アマ チュ アム セン 7 セン モラ シテ シ 


ケイ オウ タイ カク 


REEN 8,8; 1'HINDONCB, 8) - (319, 199) : PALET:CLS 


1T08: KEYI; RIGHTS CSTRÉ CI 1) NEXT: KEY C9) ON: KEV (18 


HOR TR nn anana n 


PRINT" ## Personal Telephone List +*":COLORS:LOCATE4,2:PRINT"* 7 
] 
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] 
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TELEPHONE LIST PROGRAM 
Copyright (C) 1982.18; 28 
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OCATE 5, 22: COLOR6: PRINT" -5- が 用 65 


= SS SSS IRR OAR OI OOO OOOO o, a a ee 
LYLE OIC COU OU ULI CLI IO OO eed nC a er oe 


ロー ロー ロー ロニ ロー ロー ロー ロー ロー == 


CO  COZ-COCO--COCDCOOCGOCOCDOGO  COCO-dJ-COCOCO —COQ-LLICOCOCOCOhNoOCO COGOCOCOOGA 
COCOCOCOCGOCOCGOCOCDOCOO AOS ITs LO DON DICO -—C»08-— C TAa ZINDON OAS Oo 


= Ze == = dp] Las as Li [uw] c 22 | -- Lad 
C= e—a -r > — | E = a TUN La > <> ~ Lm™ 
TcCÓJ la — Lil | anms = ーー —Li — — nc on oo 
Em ーー テー on = cr = ~ = = — «E == ee ーー ca uO 
m il = = Las TON = at = = bal €» ーー TO ュー = 
= ur w= Lal - ES cod u E i "n os = >< == e o Lal 
X«L — CD e — ant w — ve +e | E | Las EC 一 en o E 
A L | = = < 一 = < | ZL == ca ac = Li C» ーー 
IL Glial ~ = = テー te a la ne cf -- > x テー z 
_— cC» -— — LLI L oe ose — ロー ta 一 cr C X = — = = 
on n co C» = Qz == -- ole -- <> »— > o Cu o = — n 
っ LJ on = — a LH AX == Z A —J -- ZZ — wo co ーー Cr ロビ A 
Luci» ~~ - ロビ Tom > HH > => +e Lad > cu == n= a. C» 
x | = o = a uu 三 IC Laid DRQ Lag o >= o <> = cy i == ha 
[ES | or o 四 四 — == A Lo x =-=- Lihi— == ョ ーー E ューー ae OO — 
== O — cu == == |l Zw =- = pe "| -一 C 3 te TE — -- 
£C cn df + Cc CS Ane CE == ーー — “Te. =u a "n QL ” ane 
in ui - La ou ロー KE H un» = ここ il is>s0c Z [dn] mt IL co = 
RON u» --— 3 o tala eo Lad + > Won ーー CO - LLJ OL ti 
= = CN - — = aox < ニレ ーー ュー ニー AI añ La efe < — oni ーー も ーー 
CL Es nm == ~ > ロー DO mu or =e = li [| = j a Es ul = 
TI «OS = © E db a til CD ニー CO Cola =~ awe wi— BA Ow — 
Li | エー Lal -- cn = LUZ = ball -- UN) = te DE C ro " 
っ = = —J Fe ] — = km C CK =v. Cf uu --— | cm cn Ed sr — — J tr 
=A <> a. <x 3 >< (Du = Ja a = | = Lal --— て の テー nz [Nu CO a= c» 
«<= UN = o see | oe 研一 E Pam aia) lic = ーー ee as == HL -- 
"n — Z — Co o TZ. CO) ーー 一 一 ~ 一 一 ~D mit = oca > es マー ーー =u a E mo 
4H A oo -- < -— | - CN OMA l the a o つこ ~ J Lol to > mm al n Lg = [uw] 
= uud Qc» =ー で ます に に ーー 一 一 一 一 一 CNIS oe La CU -< 一 bad -一 -一 一 Ix xa 3 一 CY31— Mc co 
on 2 ~ Le. [| ーー ロコ ーー ュー ニー ニーー 一 一 ュー ニー = gw 一 Zee > = -- = O 
La ML ZZ つこ uc Ho "Lad ArLal30- -一 ~ wele <= COE エー Luce» ーー Lic 0 四 一 
> OUT CoL = =a se T Yrs. [a a e «c zz Toy A = Luo — pr oa 
Lo --Lr— sr TE = a re ラー トー TACO <4 i= ーー aa o — rm ーー = La n TO on Lal 
> Las wc Afr I— CE テーー r< Ol = c= gd C= キャ ーー QZ ロー Cx エー = 一 3 LA ou Tx 
= oC) La Y | | == x A = Othe ~~ OI us a COLI ber amt cc om — — 
有 -一 —d zZ “rr o FP La_ ロ ビー == xc = = ーーーー ON -- v^ — — TILE "~ 
Zu OO eaa — da]. èë -nA il SEN E a HE NM O -- 一 n ou I ローテ AA AA ロビ IC 
— Cole ano M | aoe == tr Ar - 0) ma = 00 cr 3c) QO en < Lal >. VES bd 
ロビ CC et —-~ Lal — LLP に < < コー CM a w= E A] > > -- 73 on CN) La oO c» 
Ome. [e ae a WE [oe -一 CUL 一 -La 了 -~ 一 Li nxo- ~ zo] Le —d LD en cy Cr on ロー 
OOM =a -一 - A- ii 一 一 ペーー ne + —H— 00 二 ~ 一 一 一 o => t.a Q= >-Lil - <> = => 
CSI ZI CY. A == Cf) ーー ee CO ~w Ld whol Con o =. = < コー Luce -一 -Li E ws 
Cia La y [up jum [m win] e rr Lib DUI HA CD Fa -- -一 - .™ ILJ us tfr = ~ 
Lam a E a p hee) M aL = Cie wl Cf» Ws. JO 一 = I= =a cu AED < ニン mo r= ーー o 
oreo ーーー atm n — SE cr. JOLLA MLSS Nc + rr c= = on = = 
Liz 4€». 1 WM A = ATE CI Lad CU «= 38 二 一 ID = OZ ou on - HL ell 一 [ => 
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< Ii [Up po Ha JE QZ ーー ニー MC MAA OS 一 一 XA ーー ロビ UN prm -一 -一 -m ンー テー 一 es に て "n n 
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: LOCATE2; 18: PRINT^ 122 120 i FORI=1T01000: NEXT: LOCATEB: 18: PRINTSPCC39): 


6 

8: COLOR?, 8: CONSOLEB; a4: KEY1, "AUTO * CHRÉ (13) t KEY2; "CONSOLE ": KEY3: "KE 

CHR(13)iKEV5 "RUN «CHRÉ (3) t KEV, " LORD" «CHRS (13) E KE YT, "WIDTH "tK 
EV(S)OFFEKEY (18) OFF: END 


CWYdudviugzszuvvsuxmbpoZzu2gvdqd,,uuzrtn 
—ic, 電話 帳 の 役目 を 果たし て も らい まし ょ う 。 

まず , と と で も プロ グラ ム の 流れ を 見 て いき まし ょ う ね 。 

100 番 か ら 110 番 まで は , 初期 化 を 行っ て いる 部 分 で す 。100 
Bic CONSOLE と いう 見 慣れ め ぬ 命 令 が 入っ て ます が , と れ は , 

画面 を 終 の 範囲 で の み 指 定 す る も の で す 。 と と で は CONSOLE 
0, 24 で すか ら , 0 行 目 か ら 24 行 目 ま で , つま り 終 一 杯 に 画面 
を と っ た わけ で す 。 

120 番 か ら 290 番 まで が メイ ン ル ー チ ン で , 130 番 か ら 190 
HETIL, どの Key が 何 の 働き を する か の 部 分 で , 検 索 , リ ス 
ト , 入 力 な ど を 使い や すく < く 分類 し て あり ます 。 

280 番 を 見 て くだ さい 。CHR$ (27) と は エス ケー プ の 
FT, も し A$ が な ら ば , 1090 番 へ 飛び ます 。 

1090 番 は , プロ グラ ム の END 部 分 に な り ま すか ら , 
を 押せ ば , 新た に リス ト を 見 れる 状態 に 戻る わけ で すね 。 

メイ ン ル ー チ ン の 残り の 部 分 は , それ ぞ れ の File を 調べ る 
時 に 必要 な , 質問 や 説明 書き を 表示 する 等 の プロ グラ ム で す 。 

300 番 か ら 1080 番 まで は , 大 きく 分 け て 7 つの 部 分 に 別れ ま 
Fo 特に サ ヴ デル ー チ ン 処 理 を し て ある わけ で は あり ませ ん が , 
KEY 1~ KEY 7 まで の File 別に まとめ て ある の で す 。 

例え ば , 970 番 か ら 1080 番 まで は , 検索 モー ド で 名 前 , Tel, 
メモ の どれ か ら で も 検索 を 行っ て くれ る 部 分 で す 。 

その 他 で は , 300 番 か ら 440 番 が 入力 モー ド , 450 番 か ら 540 
番 ま で が リス トモ ー ド , 550 番 か ら 730 番 まで が 変更 モー ド , 
740 番 か ら 760 番 まで が 追加 モー ド , と いう よう に な っ て いる 
の が 分 か る で し ょ 。 

930 番 か ら 960 番 まで は , ディ メン ジョ ン の 設定 と 。 ナマ エ , 
TEL な どの 表題 を 与え て いる 部 分 で す 。 そし て 1090 番 が END, 


ンー 中 
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あま り 本 格 的 な プロ グラ ム を の せ て な か 


MUSIC の 部 分 に , 


何 曲 か 作っ て も らい まし た 。 X1 の MUSIC 機能 


素晴らし さ を 確 か め て みて くだ さい 。 


っ た の で , 


それ で は ます 曲目 紹介 。 


チャ イコ フス キー 


ビゼー 


白鳥 の 湖 


Te 


アル ル の 女 


2, 


お も ちゃ の マー チ I 


3. 


Ryb5b»OZ7—FI 
お も ちゃ の マー チ I で は , 


4. 


1 に ドラ ム の 伴奏 を つけ て み ま し 


た 。SOUND 命令 を 使っ て , SHOT GUN の 音 と か 作っ て みた 


で し ょ 。 あ の や り 方 で , 


ドラ ム の 音 も で きち ゃ っ た ん で すっ て ! 


SOUND 7, &B00011100 


PLAY “A: B: C” 


3 和音 まで 重ね られ る わけ で すけ ど , ひと っ を NOISE (F 


メロ デイ の 部 分 は 2 和音 で す 。 


も うち ょ っ と 必要 か ナ ? 


ラム の 音 ) に し た の で , 


ノイ ズ の 説明 は , 
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& BÜSGOUOIII メイ メデ 
& B00111000 $ 


& B 以降 の 表示 で , NOISE に する か 音 に する か が 決ま り ま 
す 。 上 の 図 に パタ ー ン が 3 種類 書い て あり ます よね 。 一 番 上 か 
ら 説明 し て いき まし ょ う 。 

と れ が 実際 の お も ちゃ の マー チ の パタ ー ン で , ① と ② の 部 分 
が 問題 に な る ワケ で す 。 

① の 0 1 1 の 0 で , ¿$ CO NOISE スイ ッ チ が ON に な 
0, ② の 1 で 実行 され ます 。 つまり, 最初 の — の 中 の 0 は 
NOISE 準備 , 1 は 音 準備 , 2 番目 の — の 中 の 0 は 音 実行 , 
1 は NOISE 実行 な ん で す 。 

A:B:C3 つ と も NOISE (つま り NOISE 3 和音 ) に し 
た の が 次 の パタ ー ン で , 3 つと も 音 に し た の が 3 番目 の パタ ー 
ジ です 。 

NOISE の 入れ 方 ひと つ で , 曲 の 感じ も ガラ ッ と か わり ます 
か ら , いろ いろ 調節 し て みて くだ さい ネ ! 

それ か ら , ボリ ュー ム の と と に は 全く 触れ て ませ ん で し た が , 
ボリ ュー ム は 0 か ら 15 ま で の 数 字 で 指定 し ます 。 数字 の 大 きい 
方 が ボリ ュー ム も 大 きく な り , 0 だ と 何 も 聞 と えま せん 。 

PLAY *V 15: V 12: V 13" 

と ん な 風 に 指定 し て や れ ば OK。 第 1 パー ト は ボリ ュー ム 15, 
第 2 パー ト は 12, 第 8 パート は 13 と 少し ずつ ボリ ュー ム に 差 を 
つけ て 演奏 させ る 事 も 可能 な ん で す 。 

まあ , と に か く < く 聞 いて みて くだ さい 
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(P120 よ り ) 


男性 の 精神 機能 は 大 脳 の 右 半 球 あ る い は 左 半 球 の どちら か に 
よっ て , 別々 に コン トロ ー ル され て いる の に 対し , 女性 の 精神 
機能 は , 両方 の 脳 半球 に また が っ て いる らし いと と が 知ら れ て 
いま す 。 

女性 は 一 般 的 に , 男性 より も 成熟 する の が 早く , 二 つ の 脳 半 
球 が 機能 的 に 分 化す る 時 間 が 十分 に 与え られ て いな い の で は な 

必 の あみ よ 上 よう で すず 。 

何 か 不 思 議 な 気持 ち …… で も 安心 し て くだ さい 。 実際 に は 男 
女 間 の 平均 的 な 違い より も , 同性 の 間 の 個人 差 の 方 が ずっ と 大 
きい ん で すか ら 

脳 と ホル モン に は , 関連 性 が ある と 言わ れ て いま す が , 数 年 
前 。 ロ ッ ク フ ェ ラ ー 大 学 の ファ ー ナ ンド ・ ノ ー タ ボー ム と アー 
サー・ ア ー ノ ルド は , カナ リア が さえ ずる 機能 を コン トロ ー ル 
し て いる 脳 細胞 の 核 の 大 き さ が , 雄 と 雌 で 違っ て いる の を 発見 
し まし た 。 雄 の 脳 細胞 の 核 は , 雌 の も の より 約 四 倍 も 大 きか っ 
た だ まう で す よ 。 

「 き れい な 声 で 鳴い て いる の が 雄 よ 」 と 教わっ た 覚え が ある 
けれ ど , と ん な わけ だ っ た の ね ぇ 。 と の 核 は 発情 期 を 境 に し て , 
大 きく な っ た り , 小さ く な っ た りす る こと と も 確か め ら れ て いま 


す 。 
さら に , 雌 の 成島 に テス トス テロ ン と いう 男性 ホル モン の よ 


うな も の を 投与 する と , さえ ずり を 支配 する 脳 細胞 の 核 は , 大 
き さ が 倍 に な り , 雄 と 同じ よう に 鳴き は じ め た ん で すっ て 。 


ARDANE 
AP 
EO ey TIT 


E. 
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c 
X1HuBASIC 


の 特徴 


(1 ルリ パ ソコ ン テ レ ビ X 1 の 持つ ハー ドウ エア の 諸 機 能 


1) プ ログ ラマ ブル ・ フ ァ ン クシ ョ ン キ ー 

X1 の キー ボー ド 左 上 に , 横長 の KEY が 5 個 見 えま すね 。 
と とれ が ファ シタ ジョ ッッ KEY Cd, も の プロ ゲラ マブ プル = ラッ 
ンク ショ ン KEY に は , HuBASIC スタ ー ト 時 に 次 の よう な 命 
令 が 定義 され て いま す 。 


KEY LIST 

KEY i1:"AUTO"tCHR$4132) 
KEY 2>"?TIMES$"+CHR$C13) 
KEY de "KEY" 

KEY 4; LIST"*CHR$C26;13»5 
KEY $o "RUN "+CHR$C(13) 
KEY 6> "LOAD "tCHR$c13»5 
KEY T7T:"MIDIH " 

KEY 8>"CHR$C" 

KEY 32 COLE!” 

KEY1@, "CONT" +CHR#$(13) 


な お , と れ ら の 命令 の 意味 と 使い 方 は , 本 文中 で 説明 し て い 
x dy (P.134 参 照 ) 
2) 専用 カセ ッ ト テ ー プ レコ ー ダ ー 

大 切な プロ グラ ム を 保存 する た め の 外 部 記憶 装置 と し て , + 
ー ト マチ ッ ク カ セッ ト テ ー プ が 標準 装備 され て いま す 。 と の カ 
セッ ト は , プロ グラ ム で すべ て の 動作 を 行う と と が で き , AP- 
SS 自動 頭 出 (機能) 動作 で , 1 本 の テー プ の 中 に 何 の プ ログ 
ラム が 記憶 され て いる か , 検索 が 容易 に 行え を ます 。 た だ し , と 
の カセ ッ ト で 音楽 を 聞く と と は で きま せん 。 
3) タ イマ ー, カレ ンダ ー 付 クロ ッ ク 

年 月 日 , 時 分 秒 を 会 話 式 に 知ら せ て くれ ます 。 また , 電源 を 
切っ て も と の 記憶 は 消え ませ ん 。 


4) セ ント ロニ クス ・ イ ンタ ー フ ェ ー ス 

世界 的 な 標準 仕様 に な っ て きた セン トロ ニク ス の イン ター フ 
エー ス を 内 蔵 し て お り ,。 と れ に より プリ ンタ , プロ ッ タ な どす 
べ て の 標準 機器 を 接続 する と と が 可能 で す 。 
5)TV コ ント ロー ル 

テレ ビ の チャ ン ネ ル , ボリ ュー ム な ど を キー ボー ド で 切換 え 
る と と が で きま す 。 ま た , スー パー イン ポー ズ や , 特殊 効果 な 
ど を 楽し むと と が で きま す 。 
の ゲラ フィ ッ ク ・ プ ライ オリ ティ ・ 日 ジッタ 

h9-VUV2974v7R.G,Bétv?2-—-€$—FILSUT, 
お の お の に 優先 順位 を 付け る と と が で きま す 。 キャ ラク ター 画 
面 を グラ フィ ッ ク 画 面 の うし ろ に 隠し た り , また その 逆 な ど , 
4 種 の スク リー ン 配 置 を 自由 に コン トロ ー ル する と と が で きま 
す 。 
7) ユー ザー 定義 キャ ラク タ ゼ ネ レ ー タ 

キャ ラク ター, つま り キ ー ボ ー ド か ら 入 力 す る と と の で きる 
文字 を , 目 分 な り の オリ ジ ナ ル 文 字 や 記号 に 書き か える と と が 
目 由 に で きま す 。 Ek, 横 2 倍 文 字 , 縦 2 倍 文字 , 縦横 2 倍 文 
字 な ども 簡単 に 表示 する と こと が で きま す 。 
8) プ ログ ラマ ブル ・ サ ウン ド ・ ゼ ネ レ ー タ 

内 蔵 の スピ ー カ か ら , 和音 も 出力 する と と が で きる よう に な 
り , 簡単 な ミュ ー ジ ッ ク シ ン セ サイ ザー と し て 楽し むと と が で 
きま す 。 


(2 閣 種 の グラ フィ ッ ク 処 理 に 対応 する 48K バ イト の グラ フィ ッ 
ク 専 用 RAM 実装 


1)640 x 200 高 分 解 能 ゲ グラフィック 
フル カラ ー8 色 1 画面 また は 単色 
(8 色 中 1 色 選 択 ) 3 画面 

2) 320x 200 マル チ 画 面 
フル カラ ー8 色 2 画面 また は 単色 
(8 色 中 1 色 選 択 ) 6 画面 
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(3 多彩 な 表示 を 実現 し た WINDOW 命令 


WINDOW 命令 に よっ て 論理 座標 を 設定 する と と に より , fü 
単 な プ ログ ラム で , 多彩 な 表示 を 実現 で きま す 。 
(4) テ キス ト 用 VRAM と グラ フィ ッ ク 用 VRAM を 別々 に 装備 
テキ スト 用 VRAM と グラ フィ ッ ク 用 VRAM を 別々 に 持っ 
て いる た め , テキ スト 画面 と グラ フィ ッ ク 画 面 の 合成 を 容易 に 
行なえ ます 。 
(5 代 を 瞬時 に 変更 で きる パレ ッ ト 機 能 

パレ ッ ト の 概念 に よっ て , 色 の 変更 を 瞬時 に 行なう と と が で 
きま す 。 
(6 簡単 な プロ グラ ム で 複雑 な 画面 を コン トロ ー ル 

特殊 な ハー ドウ エア と , と れ ら を サポ ー ト する 強力 な ソフ ト 
ウェ デア に より 。 ZIZ vö MBR また ゲラ フォ ィ ぁ g を と 
テキ スト 画面 と の 間 で , 優先 順位 を 持た せ て 重ね 合わ せる と と 
が で きま す 。 と の 機能 に より , 簡単 な プロ グラ ム で 複雑 な 動き 
の 画面 を コン トロ ー ル する と と が で きま す 。 
(7)256 種 の ドッ トバ パ ター ン を 定義 で きる キャ ラク ター ゼネ レー 
タ RAM 実装 

通常 の キャ ラク ター 用 ROM の 他 に , ユー ザー が 自由 定義 
で きる キャ ラク ター ゼネ レー タ RAM を 持っ て お り , 255 REO 
ドッ トペ パタ ー ン を 定義 する と と が で きま す 。 
(8) レ イア ウト が 自在 に で きる 4 種類 の キャ ラク ター サイ ズ 

4 種類 の キャ ラク ター サイ ズ を も っ て お り , 混在 し て 用 いる 
と と が 可能 で す 。 組合 せ て 使用 する と と に より , 見 や すい 画面 
を 構成 する と と が で きま す 。 
(9)3 和音 を 合成 で きる 充実 し た シン セ 機 能 

プロ グラ マブ ル ・ サ ウン ドジ ェ ネ レー タ 回 路 を 持っ て お ぉ りら, 
各種 の 効果 音 を 容易 に 作り 出す と と が で きま す 。 
(0 プロ グラ ミン グ し な が ら テ レビ が 観 ら れる ホー ム エ ン ター 

テイ ン メ ント の 決定 版 

専用 TV に 接続 する と と に より , TV 画面 と コン ピュ ー タ 画 
面 を 混在 し て 扱う と こと が で きま す 。 


AUTO o 


CLERR 


CONSOLE 


CONT 
DELETE 


(11) キ ー ボ ー ド か ら テ レビ コン トロ ー ル が 可能 

専用 TV の チャ ン ネ ル , パワ ー, ボリ ュー ム な ど を コン トロ 
ー ル する 命令 を も っ て いる た め , と れ ら の コン トロ ー ル を プロ 
グラ ム 中 で 行なえ ます 。 
(12)8 つの タイ マー 機能 内 蔵 

8 つの タイ マー を 持っ て お り , 会 話 形 式 で , 時 刻 設定 が 可能 
EF, 
(133 ジ ャ ンプ 先 に ラベ ル 指 定 を 可能 に し , プロ グラ ム を 簡略 化 

プロ グラ ム 中 の ジャ ンプ 先 と し て , ラベ ル を 扱え る た め , 分 
か り 易 い プ ログ ラム を 作る と と が で きま す 。 
(14 構 造 化 プロ グラ ム に 対応 する 各種 コマ ンド 

IF THEN ELSE/WHILE WEND/REPEAT UNTIL 等 , 構造 
化 プ ログ ラム に 対処 し た 命令 を 備え て いま す 。 
(15 計 用 カセ ッ ト に 対応 する コン トロ ー ル 命令 

専用 カセ ッ ト に 対応 し た 命令 を いく つか 用 意 し て いる の で , 
プロ グラ ム 中 で も 自由 に カセ ッ ト の コン トロ ー ル が で きま す 。 
(16)8 桁 ま で 有効 な 単 精 度 実 数 

単 精度 実数 の 有効 桁 が 標準 で 9 ケタ と な っ て いる た め , 高 精 
度 の 演算 を 少な い 容 量 で 実現 で きま す 。 


2e 


一 般 コ マン ド ・ 


ステ ー ト メン ト 
(1 一 般 コ マン ド ・ ス テー トメ ント 
行 番号 を 自動 的 に 発生 させ る 
変数 の 初期 化 及 び メ モリ 領域 の 上 限 を 設定 する 。 メ モリ の 上 限 
アド レス 
テキ スト 画面 の スク ロー ル 設 定 を 行なう 。 上 下方 向 ス クロ ー ル 
開始 行 , 上 下方 向 ス クロ ー ル 行 数 , 左右 方 向 表 示 開 始 , 左右 方 
向 表 示 の 文字 数 
プロ グラ ム の 実行 を 再開 する 
プロ グラ ム の 一 部 を 削除 する 
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EDIT 
LIST 


LORD © 


MARGE 


NEW 
RENUM 
ON/ERROR/GOTO 


OPTION BASE 
RESUME 


ON/REST ORE 
ON/RETURN 
ON/RESUME 


RUN 
SAVE 
SEARCH 
TRON 
TROFF 
WIDTH 


LOADM 


SAVEM 


VERIFY 


LOAD? 


LLIST 
BOOT 


CLR 


の 


Uu U U OU O0 O0 U g 


ば u y DX g Y 


指定 行 を リス ト す る 

プロ グラ ム を 画面 に 表示 する 

プロ グラ ム を メモ リー 内 に 取り 込む 

“ファ イル ディ スク リプ タ : ファ イル 名 " 

複数 の プロ グラ ム を 混合 する 

"ファ オル ディ スク リプ タ : フ ァイル 名 " 

メモ リ 内 の プロ グラ ム を 抹消 し て 変数 も すべ て クリ ア に する 
プロ グラ ム の 行 番号 を つけ 替え る 

ェ エラ ー の 発生 に より 分 岐 する 

配列 の 添字 の 下限 を 宣言 する 。 0 また は 1 

ェ ラ ー 回 復 後 ,、 プロ グラ ム の 実行 を 再開 する 

指定 され た いく つか の 行 番号 に DATA 文 を 初期 化す る 
指定 され た いく つか の 行 番号 に リタ ー ン する 

ェ ラ ー 回 復 後 指定 の 行 番号 に 復帰 する 


プロ グラ ム の 実行 を 開始 する 

メモ リ 内 の BASIC プロ グラ ム を 記録 する 
指定 文字 列 を プロ グラ ム 中 より 探し 出す 
トレ ー ス 機能 を ON と する 

トレ ー ス 機能 を OFF と する 

画面 に 表示 する 文字 数 を 変更 する 

1 行 の 桁 数 は 40 ま た は 80 

機械 語 フ ァイル を ロー ド す る 


D “ファ イル ディ スク リプ タ : ファ イル 名 "。 ロー ド 番 地 
機械 語 フ ァイル を セー ブ す る 
"ファ イル デ ヂ ディスクリプタ: ファ イル 名 ", 開始 番地 , 終了 番地 


D 


S D g B 


メモ リト 上 の プロ グラ ム と 外部 デバ イス 上 の ファ イル を 比較 する 


“ファ イル ディ スク リプ タ : ファ イル 名 " 
VERIFY と 同じ 

メモ リ 上 に ある プロ グラ ム を プリ ンタ に 打出 す 
IPL を 起動 する 


変数 及び 配列 を すべ て クリ ア す る 


LIMIT 
CALL 
DATA 

DEF FN 
DEF INT 
DEF SNG 
DEF DBL 
DEF STR 
DEF USR 

DIM 
END 
FOR 

GOSUB 

GOTO 
IF/GOTO/ELSE 
IF “THEN/ELSE 

LABEL 

LET 

NEXT 

ON/GOTO 

ON/GOSUB 

POKE 

. REM 

REPERT 
RESTORE 

RETURN 

STOP 

SWAP 

UNTIL 

WHILE 


Go OU U o U U U U OU U GB U g 


> 


D> 


BASIC で 使用 する メモ リエ リア を 制限 する 
機械 語 サ ブル ー チ ン を 呼び 出す 

READ 文 で 読み 込む デー タ を 用 意 す る 
ユー ザー に より 作ら れ た 関数 を 定義 する 
変数 の 型 を 整数 型 と する 

変数 の 型 を 単 精度 実数 型 と する 

変数 の 型 を 倍 精度 実数 型 と する 

変数 の 型 を 文字 型 と する 

機械 語 ユ メーザー 関数 を 定義 する 

配列 変数 を 定義 し , メモ リ を 割り 当て る 
プロ グラ ム の 終了 を 宣言 する 
NEXT と の 間 で ルー プ す る 

サブ ルー チン を コー ル す る 
指定 し た 行 へ ジャ ンプ する 

論理 式 の 条件 分 岐 を 行なう 

論理 式 の 条件 判断 を 行なう 

プロ グラ ム 中 に ラベ ル を 付け る 

変数 に 値 を 代 人 する (省略 し て も 可 ) 
FOR ルー プ の 終端 を 示す 

指定 され た いく つか の 行 へ ジャ ンプ する 


指定 され た いく つか の サブ ルー チン へ 分 岐 する 


メモ リ 上 の 指定 番地 に デー タ を 書き 込む 
プロ グラ ム に 注釈 を 和信 れ る 

UNTIL 文 と の 間 で ルー プ す る 

READ 文 で 読む DATA 文 を 指定 する 
サブ ルー チン か ら 復 帰す る 

プロ グラ ム の 実行 を 停止 する 

2 つの 変数 の 値 を 交換 する 


o REPEAT 文 の 終端 を 示す 
o WEND と の 間 で ルー プ す る 
WEND © WHILE 文 の 終端 を 示す 
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ERROR © 
ASK > 
MID$ ^ 


MEM$ © 
MON © 
SCROLL ^? 


PEEK ^ 
FRE © 
ERL © 
ERR © 
USR > 


VARPTR > 


CREV o 
CFLRSH » 
CSIZE o 
CSRLIN © 


POS © 
MKI¢ © 
MKS$ ^ 


その 他 の 病 令 、 


関数 、 予 約 変 数 


(2 特殊 命令 


エラー を 発生 させ る (エラ ー 番 号 0 一 255) 
会 話 型 の タイ マー 設定 ルー チン を 呼び 出す 
文字 列 の 一 部 を 置き 替え る 

(MID$ の 代入 ) 

指定 メモ リ に 対し 文字 列 を 直接 転送 する 
マシ ン 語 モー ニタ に 制御 を 移す 

スム ー ズ スク ロー ル を ON/OFF する 


(3 茜 殊 関数 と 予約 変数 


メモ リ 上 の 指定 番地 の 内 容 を 読み 出す 
メモ リ の 未 使用 領域 の 大 き さ を 与え る 

ェ ラ ー の 発生 し た 行 番号 を 与え る 

発生 し た エラ ー コ ー ド を 与え る 

機械 語 で 作ら れ た ルー チン を 呼び 出す 
変数 の 格納 され て いる メモ リ 番 地 を 与え る 


(4 テキ スト に 関す る 命令 


テキ スト を 反転 モー ド に する 
テキ スト を 点滅 モー ド に する 
テキ スト の 大 き さ を 変え る 
現在 の カー ソル の 人 行 位置 を 与え る 


(5) テ キス ト に 関す る 関数 と 予約 変数 


テキ スト 上 の カー ソル の 水平 位置 を 与え る 
整数 値 を 2 文字 の 文字 列 に 変換 する 
単 精度 数 値 を 5 文字 の 文字 列 に 変換 する 


MKD$ 
ASC 
CHR$ 

HE を 
INSTR 
LEFT$ 
LEN 
MID$ 
OCT ま を 
RIGHT ま 
SPACES 
STR$ 
STRING$ 
VAL 
MEM$ 
HEXCHR$ 
BIN$ 
SPC 

TAB 
CHARACTERS 
SCRN$ 
INKEY$ 


SCREEN 
GRAPH 
CLS 
COLOR 
PSET 
PRESET 
LINE 
CIRCLE 


Go O0 U 0 U Sw. 0 Q9 UU U gU U U U OU せ 9 OU BD 9 


0 8 8 U 8 U U 8B 


倍 精度 数 値 を 8 文字 の 文字 列 に 変換 する 

文字 CO の キャラ クタ コード を 与え る 
指定 し た キャ ラク タコ ー ド を 持つ 文字 を 与え る 

16 進 数 に 変換 する 

文字 列 の 中 か ら 任 意 の 文字 列 を 探し , その 位置 を 与え る 
文字 列 の 左側 か ら 任意 の 長 さ の 文字 を 与え る 

文字 列 の 総 文字 数 を 与え る 

文字 列 の 中 か ら 任 意 の 長 さ の 文字 列 を 与え る 

8 進数 に 変換 する 

文字 列 の 右側 か ら 任意 の 長 さ の 文字 列 を 与え る 
任意 の 長 さ の 空白 文字 列 を 与え る 

数 値 を 表わす 文字 列 を 与え る 

任意 の 文字 を 任意 の 数 だ け 与 える 

文字 列 の 表わす 数 式 を 与え る 

メモ リ か ら 文 字 を 数 個 取 り 出 す 

16 進 数 に 変換 する 

2 進数 に 変換 する 

任意 の 数 だ け 空 白 を 出力 する 

現在 カー ソル の ある 行 の 任意 の 位置 まで 空白 を 出力 する 
画面 の 座標 (X, Y) に 表示 され て いる 文字 を 与え る 
指定 座標 か ら 指定 数 の 文字 を と っ て くる 

現在 押さ れ て いる KEY デー タ を 与え る 


(67274 9 2858 


グラ フィ ッ ク 表 示 の 入出 力 モ ー ド を 指定 する 
SCREEN と 同様 

画面 を クリ ア す る 

テキ スト , バッ ク の 人 色 指 定 を する 

グラ フィ ッ ク 画 面 の 任意 の 位置 に ドッ ト を セッ ト す る 
PSET と 同様 に リセ ッ ト す る 

指定 され た 2 点 間 に 直線 を 引く 

円 を 描く 
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PAINT 
POLY 
WINDOW 
POKEG 
GET@ 
PUT@ 
LAYER 
CANVAS 
PRW 
PALET 
POSITION 
PATTERN 


POINT 
PEEK@ 


MIRRORS 


ABS 
ATN 
CDBL 
CINT 
cos 
CSNG 
EXP 
FIX 
INT 
LOG 
RND 
SGN 
SIN 


Oo e @ uU OQ zo U 9 


Oo 8 U g 


o JG G 2 y y O9 g CO 2 dg 0 G 


指定 され た 領域 を ぬり つぶ す 

多角 形 を 描く 

グラ フィ ッ ク 画 面 の 表示 エリ ア を 指定 する 

VRAM 上 の 指定 番地 に デー タ を 書き 込む 

VRAM 上 の デー タ を 変数 また は 配列 に 読み 込む 

VRAM 上 に デー タ を 書き 込む 

テキ スト と グラ フィ ッ ク の 優先 順位 を 指定 する 

マル チ 画 面 モ ー ド 時 の 各 グ ラフ ィ ッ ク 画 面 の 色 を 指定 する 
テキ スト と グラ フィ ッ ク の 優先 順位 を 指定 する 

カラ ー パ レッ ト を 変更 する 

PATTERN 文 に よる パタ ー ン 表示 の 位置 指定 を する 

グラ フォ ィ ッ クエ リア 上 だ 任意 の ゲラ テラフィ ッ ク パ ター シ を 描く 


(7) グ ラフ ィ ッ ク 関 数 


グラ フィ ッ ク 座 標 の 状態 を 与え る 
VRAM 上 の 指定 され た 番地 の 内 容 を 読み 出す 
グラ フィ ッ ク バ パタ ー ン を 指定 され た 位置 か ら 反 転 す る 


(8 RUEZ R O RO BARK 


絶対 値 を 与え る 

逆 正 接 を 与え る 

倍 精度 数 に 変換 する 
整数 値 に 変換 する 

余弦 を 与え る 

単 精度 実数 に 変換 する 

e に 対す る 指数 関数 の 値 を 与え る 
整数 部 を 与え る 

小数 点 以下 を 切り 捨て た 数 値 を 与え る 
自然 対数 を 与え る 

乱数 を 与え る 

符号 を 調べ る 

正弦 値 を 与え る 


SQR 
TÁN 
PAI 
RAD 
CVI 

CYS 
CYD 


02 y uU y € Q 


CGEN o 


DEF CHR$ 


CGPAT$ 


KEYG 

KEY 

DEF KEY 
KEY LIST 
KLIST 

KBUF ÓN 
KBUF OFF 
REPERT ON 
REPEAT OFF 
KEY ON 

KEY OFF 
KEY STOP 
ON KEY GOSUB 
CLICK ON 
CLICK OFF 


平方 根 を 与え る 

正 接 値 を 与え る 

ァ r の XX 倍 の 大 き さ を 与え る 

引数 を X 度 と し た と き の ラ ジア ン を 求め る 

2 文字 の 文字 列 を 数 値 デ ー タ に 変換 し た 値 を 与え る 
5 文字 の 文字 列 を 数 値 デ ー タ に 変換 し た 値 を 与え る 
8 文字 の 文字 列 を 数 値 デ ー タ に 変換 し た 値 を 与え る 


(9) プ ログ ラマ ブル ・ キ ャ ラク ター ゼネ レー タ 


キャ ラク ター ゼネ レー タ か ら の 読み 出し を 切換 える 


D ユー ザー 定義 キャ ラク ター ゼネ レー タ に パタ ー ン を 定義 する 


E> 


U U U B Q 


o o o o U o U B u p 


(10 プ ログ ラマ ブル ・ キ ャ ラク ター ゼネ レー タ の 関数 
ユー ザー 定義 キャ ラク ター ゼネ レー タ 
MIKEY に 関す る 命令 


先行 入力 バッ ファ を 定義 する 

ファ ンク ショ ン キ ー 人 文字 列 を 定義 する 

KEY と 同様 | 

ファ ンク ショ ン キ ー の 定義 状態 を 表示 する 
KEY LIST と 同様 

KEY の 先行 入力 を ON する 

KEY の 先行 入力 を OFF する 

リピ ー ト 機能 を ON する 

リピ ー ト 機能 を OFF する 

ファ ンク ショ ン キ ー か ら の 割込み を 可能 と する 
ファ ンク ショ ン キ ー か ら の 割込み を 不可 と する 
ファ ンク ショ ン キ ー か ら の 割込み を 停止 する 
ファ ンク ショ ン キ ー に よる 割込み の 開始 行 を 定義 する 
キー の クリ ッ ク 音 を ON に する 

キー の クリ ッ ク 音 を OFF に する 
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INPUT # 
LINE INPUT# 
PRINT# 
WRITE# 


OPEN 
CLOSE - 


DEVICE 


EOF © 
Loc : 


FPOS 
INPUT $ 


INPUT 


LINE INPUT : 


LOCATE 
CURSOR 

OUT 

PRINT 

PRINT USING 
READ 

WRITE 


INP 


BEEP 


U 


Ly 


(122 フ ァイル 関係 の 命令 


シー ケン シャ ルフ ァイル か ら デ ー タ を 読み 込む 

] 行 を シー ケン シャ ルフ ァイル か ら 読 み 込 む 

シー ケン シャ ルフ ァイル に デー タ を 出力 する 

シー ケン シャ ルフ ァイル に デー タ を 書き 出す 

ファ イル を 開く 

ファ イル を 閉じ る 

ファ イル ディ スク リプ タ の ディ フォ ルト 値 を 決め る 


(13) フ ァイル 関係 の 関数 


ファ イル 終了 コー ド を 与え る 

ファ イル 中 で の 論理 的 な 現在 位置 を 与え る 

ファ イル 中 で の 物理 的 な 現在 位置 を 与え る 

指定 され た ファ イル より 指定 され た 長 さ の 文字 を 与え る 


(4 入出 力 関係 


変数 を 人 力 す る 

1 行 を 文字 変数 に 入力 する 

テキ スト 画面 の カー ソル 位置 を 指定 する 
LOCATE と 同様 

出力 ボ ポート に 1 バイ ト の デー タ を 送る 
画面 に 情報 を 出力 する 

指定 され た 書式 に 従っ て 出力 する 
DATA 文 で 用 意 さ れ た デー タ を 読み 込む 
画面 に デー タ を 出力 する 

(15) 入 出力 関係 の 関数 
入力 ポー ト か ら 値 を 得る 

(16 府 に 関す る 命令 


内 蔵 プ ブザー を ON/OFF する 


MUSIC 
TEMPO 
SOUND 

PLAY 


TIMES 
DATE 


Dav o 


FAST 
REW 
EJECT 
APSS 
CSTOP 
CMT 


FILES 


LFILES 


KILL 


LPRINT 


HCOPY 
LPOS 


TVPW 
CHANNEL 


スト リン グ デ ー タ で 指定 され た 音 を 出す 
MUSIC 文 で 演奏 する 音楽 の 演奏 速度 を 指定 する 
サウ ンド IC に 直接 デー タ を 書き 込む 

音階 , テン ポ を 指定 する 


Go g 06 g 


(17 タ イマ ー 関 係 の 命令 


o 内 蔵 ク ロッ ク の 時 刻 , タイ マー を 設定 する 
o 内 蔵 カ レン ダ の 月 日 を 設定 する 
内 蔵 カ レン ダ の 曜日 を 設定 する 


(1) カ セッ ト に 関す る 命令 


カセ ッ ト テ ー プ の 早送り を する 

カセ ッ ト テ ー プ の 巻 戻 し を する 

カセ ッ ト 取 出し 口 を オー プン する 

カセ ッ ト テ ー プ ファ イル の 先頭 を 検出 する 
カセ ッ ト を スト ッ プ する 

カセ ッ ト の 状態 を 与え る 


Oo 8 U OB 0 g 


1927 4 01283 oes 


o ディ スク 上 に 登録 され て いる ファ イル 情報 を 表示 する 

o ディ スク 上 に 登録 され て いる ファ イル 情報 を プリ ンタ に 表示 す 
る 

o ディ スク より 指定 ファ イル を 抹消 する 


(20 プ リン タ 命 令 


o プリ ンタ 情報 を 出力 する 
画面 の コピ ー を と る 
プリ ンタ ヘッ ド の 現在 位置 を 与え る 


(21)TV に 関す る 命令 


o TV の パワ ー を ON/OFF する 
Oo TV の チャ ン ネ ル を 変更 する 
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VOL 
CRT 


STICK 
STRIG 


NEXT without FOR 


g 


Ü 


一 


TV の 音量 を 変更 する 
画面 の 表示 を 変更 する 


(222 ジ ョ イス ティ ッ ク に 関す る 命令 


ジョ イス ティ ッ ク の 状態 を 与え る 
ジョ イス ティ ッ ク の トリ ガー ボタ ン の 状態 を 与え る 


233 エ ラー メッ セー ジ 


NEXT が ある の に FOR が あり ませ ん 


Syntax error [2| 文法 が まち が っ て いま す 
RETURN without [3] と の RETURN は GOSUB で 呼ば れ て お り ま せん 
Out of data [4] READ で 読む DATA が あり ませ ん 
dal. Tunction m] OP PRA D ELS 
Overflow [6| 数 が 大 きす ぎ て 計算 で きま せん 
Out of memory 7] メモ リ の 残り が あり ませ ん 
Undefined label [8] 行 番号 も し く は ラベ ル 文 が 無く て 行き 先 が わ か り ま せん 
Subscript out of [9] 配列 の カッ コ の 中 の 値 が お か し いで す よ 


range 


同じ 変数 を 2 回 DIM を 取っ て ます よ 
0 で 割る と と は で きま せん 


Duplicate 
Definition 
Division bu zero 


=] 回 


Illegal direct 
Tupe mismatch 
String too lona 
Too complex 


Can't continue 


Undefined function 


No RESUME 
RESUME without 
error 
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El la ll ll (El 


co 


| [él 


N 
© 


ダイ レク ト 命 令 で 使え ませ ん 

文字 と 数 値 を まち が えて いま す よ 
文字 が 長 す ぎ ま す よ 

計算 式 が むず か し すぎ ます 

つづ け て 実行 が 出来 ませ ん 

その FUNCTION は 登録 され て お り ま せん 
RESUME を 実行 し な いで プロ グラ ム が 終わ り ま し た 
ェ ラ ー が 起き て いな い の K RESUME され まし た よ 


Illegal format 


Missing operand 
Line buffer overflow 


Bad screen mode 
UNTIL without REPEAT 
Out of tape 

Tape read ERROR 

Bad file mode 


Out of stack 
WHILE without WEND 
WEND without WHILE 


Reserved feature 


FOR without NEXT 


Format over 


FIELD overflow 


Device in use 


Bad file number 


File not found: 


Already open 


Device 1/0 ERROR 


File already exists 


Device full 
Input past end 


Bad allocation table 


is SF [S S S ES fS) [S 


CD 
ーー 


国 图 图 


エラ ー メ ッ セ ー ジ の 定義 され て いな い エ ラー が 起き まし た よ 
ペラ メー タタ を っ けけ 忘れ て いま すま 

1 行 に 入る 文字 の 限界 で す よ 

グラ フィ ッ ク メ モリ は , グラ フィ ッ ク 命 令 以外 に 使え ませ ん よ 
REPEAT 文 が ない の に UNTIL は 使え ませ ん よ 

カセ ッ ト テ ー プ が 入っ て お り ま せん 

カセ ッ ト テ ー プ か ら デ ー タ を 正常 に 読む と と が で きま せん よ 
異 っ た モー ド の ファ イル 参照 は で きま せん よ 

POP 命令 を 実行 し よう と し た が , スタ ッ ク K 何 も 入っ て いな 
いじ ゃ な いで すか 

WHILE ルー プ に WEND が あり ませ ん よ 

WHILE が な い の に WEND が ある の は お か し いよ 

カセ ッ ト も し く は , ディ スク が 用 意 さ れ て いな けれ ば 実行 で き 
ませ ん よ 

FOR が ある の に NEXT が あり ませ ん よ V 
PRINT USING で 指定 し た フォ ー マ ッ ト が 長 す ぎ て 出力 で きま 
せん よ | 
FIELD 文 で ラン ダム ファ イル 内 の レコ ー ド 長 が 256 以上 に な 
っ て いま す よ 

外部 装置 は 今 使用 中 で す 

オー プン され て いな い フ ァイル や , 起動 時 に 指定 され て いな い 
ファ イル は 参照 で きま せん 

LOAD, KILL また は OPEN d$ C, ディ スク 無い ファ イル 
は , 参照 で きま せん 

すでに OPEN され て いる ファ イル は , 
せん よ 

入出 力 装置 に 異常 発生 で す 


2 度 と OPEN で きま 


57] NAME で 変更 し よう と し た ファ イル 名 は , すでに 登録 され て 


いま す よ 

デー タ 量 が 人 入出 力 装置 の 許容 容量 を 越え た て し まい まし た よ 
end of file à, 空 フ ァイル を 読ん で は いけ ませ ん よ 
ディ スク の 中 の FAT テー ブル が 壊れ て いま す よ 
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ieee CEN 65 ディ スク リプ タ が 違っ て いま す よ 


Bad record 666 レ コー ド 番 号 が 違っ て お り ま す 
File not open 71] ファ イル は , Open し な けれ ば 使え ませ ん よ 
Write protected 22 カセット テー プ , また は フロ ッ ピ ー デ ィ ス ク が 録音 で き な い 状 


Device offline 73 指定 され た 入出 力 装 置 が つなが っ て お り ま せん よ 


と れ ら 48 個 の エラ ー メ ッ セ ー ジ が 用 意 さ れ て お り , プロ グラ 
ム の あや まり を 的 確 に 指示 し て くれ ます 。 


© 


その 他 


(IKE) 


(2 コン トロ ー ル コー ド (1) 


[CTRL] + HEX El pe - s = 
@ 又は 、 | 00 0 
A a | 01 1 | 自動 挿入 モー ド に する 
B b | 02 2 | カー ソル を 1 語 戻 す 
c c| 03 3 | 実行 を 停止 する [SHFT|+[BREAK| 
D d 0 4 4 | 初期 状態 に する 注 1 
E e | 05 5 | カー ソル か ら 右 を 行 の 終り ま て 消す 
F f | 06 6 | カー ソル を 1 語 進 め る 
G g 07 7 | ピッ ノ と ベル を な ら す 
H h 08 8 | 一 文字 抹消 する DEL 
| i | 09 9 | 水平 タプ HTAB 
J j| 0A | 10 | ライ ン フ ィ ー ド を する 
K k| OB | 1 1 | カー ソル を ホー ム ポ ジ シ ョ ン へ 移動 する HOME 
L | 0c 1 2 | 画面 を 消去 する CLR 
M m | 0D | 13 | キャ リッ ジリ ター ン を する d 
N n 0E 1 4 | ライ ン 挿 入 (アッ プス クロ ー ル ) 
[e] o | 0F 1 5 | ライ ン 挿 入 (ダウ ンス クロ ー ル ) 
P p | 10 | 16 
Q q 11 17 | 一 時 停止 を 解除 する 
R r 12 18 | 一 文字 挿入 する INS 
S s | 13 | 19 | 一 時 停止 を する BREAK 
T t 14 20 | 水平 タプ を セッ ト す る 
U alas | 21 
V v| 16 | 22 
w w | 17 | 23 | 次 の 行 と 結合 する 

LX x 18 24 
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Y y | 19 | 25 | 水平 タプ を 抹消 する A 
z z | 1A | 26 | カー ツル 以下 の 画面 を すべ て クリ ア 
E | | 1B | 27 
Y 1 | 1C | 28 | カー ソル を 右 へ 移動 
コ | | 1D | 2 9 | カ ヵ ー ソ ル を だ へ 移動 
^ —-|AE 30 | カー ソル を 上 へ 移動 L1] 
一 1F | 31 | カー ソル を 下 へ 移動 | 


+[D] を 実行 する と 、 次 の すべ て の 命令 が 瞬時 に 実行 され ます 。 
(PRINT CHR$( 4 ) で は 行わ れ ま せん 〕 


CONSOLE 8,25.,0.,880 or 48 


COLOR 7 

SCREEN 806.0 or 1:1 
CREV @ 

CFLASH 8 

LSIZE B 

CGEN 68 

WINDOW (B,0>-(639 or 319,199) 
PRW 

PALET 

SOUND 7, &H3F 
SOUND 8,0 

SOUND 9,0 

SOUND 168.8 


(25) コ ント ロー ルコ ー ド [2) 


CTRL + 内 * 備 x 
precum roo | バッ ク の 色 を B に する COLOR, 0 
1 L 赤 か COLOR, 1 
2 E n COLOR, 2 
3 " X n COLOR, 3 
4 * r COLOR, 4 
5 "n 。 マゼンダ 7 COLOR, 5 
6 [ $T COLOR, 6 
7 , É n COLOR, 7 
テン キー の 0 文字 グラ フィ ッ ク の 色 を B に 指定 する COLOR 0 
1 / 赤 " COLOR 1 
2 " & " COLOR 2 
3 " 黄 " COLOR 3 
4 r * " COLOR 4 
5 ” マゼンダ n COLOR 5 
6 Te ” COLOR 6 
7 ü " COLOR 7 
ノ | キャ ラ セ ゼネ の ROM/RAM を 切換 える CGEN 
*| 点 小文字 スイ ッ チ CFLASH 
ー | 反転 文字 スイ ッ チ CREV 


フル キー ボー ド の 数 字 と 、 テ ン キ ー の 数 字 は コー ド が 異な っ て いま す 。 
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eeTV の ダイ レク トコ ント ロー ル 


(SHIFT) + 内 容 備 考 
テン キー の 0 音声 消去 

1 チャ ン ネ ル 1 

2 2 

3 3 

4 4 

5 5 

6 6 

7 7 

8 8 

9 9 

/ 10 

* 11 

= 12 

+ | TV. コ ンピュータ 混在 モー ド ( コ ント ラス ト ダ ウン ) CRT3 

- TV の み CRTO 
コン ピュ ー タ の み CRT1 
ポリ ュー ム ノ ー マ ル 

T ボリ ュー ム ア ッ プ 

l ボリ ュー ム ダウ ン 

> チャ ン ネ ル ア ッ プ 

= チャ ン ネ ル ダ ウ ン 

⑱⑮X 1 の TV モー ド は VHF で も UHF で も 好き な チャ ン ネ ル を 好き な チャ ン ネ ル 番 号 
に セッ ト で きま す 。 


(27)/ フ ァイル ディ スク リプ タ 
ディ ネプ レル イィ CRT: 
が りー だ SCR: 
E: REY 
79727 LPT: 
カセ ッ ト CAS: 


だ ィ ャ ペグ 0 ドラ イブ 
ディ スク 1 ドラ イブ : 
ディ スク ドラ イプ : 
THATS ドラ イダ : 


グラ フィ ッ ク メ モリ MEM: 
外部 メモ リ 0 EMMO: 
$ 
外部 メモ リ 9  EmM9: 
すべ て の 外部 装置 に と の 様 な 名 前 を 付け て お り ま す 。 


R54 


28X 1 メモ リマ ッ プ 
X1 メ モリ マッ プ 
0000 


3FFF 
4000 


TEFF 
8000 


BFFF 
C000 


FFFF 


POKE PEEK POKE@ PEEK @ 


プ ゼ グラ ム 用 
RAM VRAM 


IPL 起 動 時 の メモ リマ ッ プ 


ジス アム ツマ アト 外部 シス テム プロ グラ ム 
ウエ エア ファ イル 


0000 


0000 


BOOT ROM4Kbytes 


8000 


EFEF 


255 


(29X 1 シス テム 1/10 マッ プ 

I/O アク セス モー ド に は , シン グル アク セス モー ド と 同時 ア 
ケタ セス スモ モード が あお あり ます 。 ジジ アゲ ダル アタ セ ヌ モー ド は 、 いく つつ 
か の I/O の うち の 個々 に アク セス する モー ド で す 。 同時 アク 
セス モー ド は , 同時 に 複数 の I/O( グ ゲラ フィック VRAM) に 対し て 
アダ セス する も や ー ド で ぜ で す 。 


シン グル アク セス モー ド 同時 アク セス モー ド 


メデ ディ タグ 
VRAM1(B) 


ダグ ププ ブ ィ ッ メ ググ 
VRAM2(R) 


PITA 9 3 
VRAM3(G) 


グフ フィ イッ ツク 
VRAM(R:G) 


グフ フィ ッ ダ 
VRAM (B:G) 


グズ ソイ オッ タダ 
VRAM( B・R) 


生ま れ て 初め て コン ピュ ー タ に 触れ て , 勉強 を 始め て 
か ら 3 カ ヵ月 が 過ぎ まし た 。 自 分 の 全く 知ら な か っ た 世界 
が , 今 は と て も 身近 な 感じ ……。 

Cb, 本当に 不思議 な 気 が す る ん で す よ ね 。 小 さ な き 
っ か け か ら 始 まっ た と と が , 3 カ ヵ月 の 間 , 私 の 生活 の 中 
心 に な っ て し まっ た ん で すか ら 。 

そし て , と と で 私 の 得 た 教訓 は , 別に マイ コン に た 限っ 
た と と で は あり ませ ん が , 少し で も 興味 と か 関心 を 持っ 
た の な ら , まず や っ て みる の が 一 番 。 そ し て , や る の な 
D, や れる 所 まで が ん ば り 通 す , と いう て と と 。 何 か 始め 
た いん だ けど , どう し よう か し ら ? な ん て 悩ん で いる 
人 が いた ら , まず 始め て みる と と で す 。 

と と ろ で , と の 本 は 本 当 に 何 も 知 ら な い 私 が 書い た 本 
な ん で すね 。 だ か ら 分 か り に くい 説明 で 困っ て る 人 が い 
る ん じゃ な いか っ て 心配 。 そ れ で も る 最後 まで つき あっ て 
くだ さっ た 方 …… ど う も あり が と う ご ざ いま し た 。 Bee 

a 先生 も 専門 用 語 が 使え ず 困 っ て まし た けど , と に か く 分 
エビ ローグ 。 かり 易く 教え て くだ さい まし た 。 私 と し て は , コン ピュ 
ー タ に 何と な く 抵 抗 が ある と か , いろ いろ な コン ピュ ー 
タ の 本 を 読ん で も な お わか ら な い …… な ん て 人 に , 是非 

と の 本 を 読ん で も らい た いな と 思っ て いま す 。 

“入門 書 の 入門 書 " だ と で も 考え て も ら え ば あり が た 
いで すね 。 

さて 現在 の 私 は と いう と , も う コ ンピュータ は バッ チ 
リ な ん て いう 状態 で は と て も な く て , 相変わらず 命令 語 
を 忘れ た り , プロ グラ ム を 作る 時 は , 先生 に 教え て も ら 
っ た り と いっ た と と ろ 。 

思う に , 理解 する と いう と と と , 独力 で 考え 出す と い 
うと と の 間 に は , 大 き な 隔 た り が ある よう な 気 が し ます 。 
私 の 場合 は , や っ と て 理解 に 手 が 届 いた よう な 所 に いる わ 
け で , すら すら プロ グラ ム が 組め る よう に な る に は , ま 
だ 当分 勉強 が 必要 で し ょ う ね 。 

た だ と と で 一 つ 強 調 し て お きた いと と は , 今 の 私 は 早 
く そう いう 状 態 に な り た いと いう 気持 ち が 強 く て , も う 
コン ピュ ー タ へ の 不安 感 や , 恐怖 感 は な いと 言う と と 。 
ーー ニー デー デコ 


と っ つき に くい の は , 結局 ほん の 最初 だ け な ん で すね 。 
だ ん だ ん お も し ろく な っ て くる と と は 受け あい ます 。 だ 
か ら , あな た に も 是非 始め て 欲し いと 思う ん で す 。 

HUDSON で 働い て いる プロ グラ マー の 方 々 は , 毎日 
頭 を 悩ま せな が ら も と っ て も 楽し そう で す 。 早 く 本 当 の 
楽し さがわ か る よう に な り た いな あ ……。 

と と ろ で , 私 が こん な 勉強 を 始め て 周囲 の 反応 は と い 
うと , 友達 は いい チャ ンス が あっ た ネ な ん て 言っ て る し , 
両親 は 不思議 な 機械 を 買い 込ん で 何 を 始め る つも り …… 
な ん て 感じ 。 

友達 の 中 に は , 文系 で も 情 科研 を と っ て いる 人 も いる 
の で 興味 を 持っ て 話し を 聞い て くれ ます 。( ウ チ の 大 学 
に は 情報 科学 研究 所 と いう も の が 設置 され て いて , €C 
で コン ピュ ー タ を 教え て も ら え ます 。 人 入門 者 は フォ ー ト 
ラン を 勉強 し て いま す が , 段階 に 応じ て 他 の 言語 も 勉強 
で きる よう で す 。 毎週 宿題 が 出さ れる の で , みん な 大 変 
そう ) あら た め て コン ピュ ー タ 人 口 の 多い と と に 驚き ま 
FLA: 

さて , と れ か ら 始 め よ うと いう 皆さん へ 。 

まず 入門 書 と マニ ュ ア ル を 先生 に し て , 必ず 自分 の 手 
で KEY を た た き な が ら 始 め て みて くだ さい 。 コ ン ピ ュ 
ー タ が な けれ ば , 本 の 中 に も 書き まし た けど , 秋葉 原 へ 
根気 よく 通う な ん て いう 手 も あ る で し ょ う 。 

買い も し な い の に お 店 の 人 に 悪い か な ぁ … な ん て 考え 
な いで , どん どん 聞い て 覚え ちゃ うこ て と 。 今や マイ コン 
ショ ッ プ の 受け 入れ 体勢 も 変わ っ て き て いま す 。 お 店 の 
人 を 困ら せ ち ゃ う ぐ ら い に な り ま し ょ う 。 顔なじみ に な 
っ て し まえ ば , も うと っ ちの も の の 〆 

だ いた い BASIC ( 他 の 言語 で も いい ん で すけ ど ) を マ 
スタ ー し て , key 操作 も 分 か る よう に な っ た ら , 次 は 人 
の 作っ た プロ グラ ム を 研究 し て み ま し ょ う 。 ゲ ー ム な ど 
は , あき る ぐら い 遊 ん で , ゲー ム の プロ グラ ム の 内 容 を 
研究 し て みる と と で す 。 

私 が 勉強 し て いて 特に 実感 し た こと と は , と に か く プ ロ 
グラ ム を 組む の は 大 変 だ ど と いう と と な ん で す 。 英語 は 読 


め て も , な か な か 英作 文 は 書け な いで し ょ 。 コ ン ピ ュ ー 
タ も 同じ で す 。 む し ろ 作 文 以上 に , プロ グラ ム 作 成 は 難 
bs て 根気 の い る 作業 で す 。 

BASIC を 知っ て いる 程度 で は プロ グラ ム は 組め ませ 
ん 。 で すか ら , し ば らく は 他人 の プロ グラ ム を 先生 に し 
C, な ぜ こ うな っ て いる の か な , と 考え て み ま し ょ う 。 

Kit, 簡単 な プロ グラ ム を 書い て みる と と で すね 。 た 
と えば 数 あて ゲー ム な ん か 。 誰か の プロ グラ ム に , 少し 
手 を 加え て 変え て みる ぐら いで も , と の 段階 で は いい ん 
じゃ な いか な ぁ 。 

そし て , 最後 は と に か く 悩 み 抜 いて 独力 で 作っ て みる 
と と 。 何 か 参考 に し な が ら や っ て いた の で は , 結局 自分 
の も の に な り ま せん 。 最終 的 に は 自分 で 悩む し か な いよ 
う で す 。 

今 ま で いろ いろ 書い て きま し た けど , と と で 一 番 大 切 
な 事 を 教え まし ょ うか 。 

それ は , コン ピュ ー タ の 勉強 を 好き に な っ て し まう と 
と で す 。 毎日 必ず コン ピュ ー タ に 触れ る と と 。 触れ な く 
て は 気 が す まな いと いう 位 に な っ て し まう こと と で す ネ 。 
せっ か く 勉 強し た 事 も , 1 カ月 も すれ ば だ ん だ ん 忘れ て 
来る も の で す よ ネ 。 だ か ら , 結局 と うい うと と は , 習慣 
(に し ちゃ う の が 一 番 な の で す 。 

ーー と 今 の 私 が 考え られ る 限り の 方 法 を 書い て 来 まし 
た が , 別に 勉強 の 仕方 が 決っ て る わけ じゃ あり ませ ん ヨ 。 

と に か く 一 番 あ な た に 合っ た 方 法 を 見 つけ て 下さ い 。 
と いう と と な の ね 。 

私 に し て も , まだ ほん の 入り 口 に 立っ て いる よう な も 
DT, 道 は な お 延々 と 続い て いま す 。 も っ と も っ と 勉強 
Lc, また 機会 が あれ ば , も う 少 し 高度 で , 内 容 の 濃い 
も の を 書い て みた いと も 思っ て いま す 。 と 期待 下さ いね 。 

最後 に , 根気 よく つき 合っ て くだ さっ た Bee HH, € 

し て Hudson OH SA, 本 当 に あり が と う ご ざ いま し た 。 
また 内 容 ・ 文 章 表 現 と も に , 稚 押 な と の 本 に つき あっ て 
くだ さっ た 読者 の 皆さん に も 心から お 礼 申 し 上 げ ま す 。 

1982 年 11 月 1 日 品川 ゆり 
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パソ コン EX1 "s 


3D の 鮮やか な シミ ュ レ ーション ゲー ム を 作っ て みた い ……… 
マイ コン フリ ー ク の 君 は 、 一 度 は こう いう 夢 を 想い 描い た に 
違い な い 。 何故 な ら 、 ゲ ー ム ソフ ト こ そ 君 の イメ ー ジ 空間 を 最 
も 拡 く 、 深 く 充 た し て くれ る も の に 他 な ら な いか ら だ 。 
無限 に 拡がる デジ タル 空間 を 、 心 ゆく まで 遊泳 し て みな いな か 。 
あら ゆる メデ ィ ア に 人 間 性 を …… ソフ ト ・ メ ディ ア は 、 ハ ド 
ソン ・ ソ フト が 提供 する パソ コン ソフ トウ ェ ア 情 報 誌 で す 。 
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